Предмет: Информатика,
автор: Анка34677
ПОМОГИТЕ ПЛИЗ!!! СРОЧНО НАДО!!!
1. Составить программу решающую следующую задачу: дано трехзначное число. В нем зачеркнули первую цифру слева и приписали ее справа. Вывести полученное число.
2. Составить программу решающую следующую задачу: дан номер некоторого года (целое положительное число) . Определить соответствующий ему номер столетия , учитывая, что, к примеру, началом 20 столетия был 1901 год.
Ответы
Автор ответа:
0
var n: integer;begin{задание 1} write('число: '); readln(n); n:=(n mod 100)*10 + n div 100; writeln('новое число: ',n);{задание 2} write('год: '); readln(n); if (n mod 100)=0 then n:=n div 100 else n:=(n div 100)+1; writeln('номер столетия: ',n);end.
Интересные вопросы
Предмет: Русский язык,
автор: safarbek2008
Предмет: Қазақ тiлi,
автор: zhanerkeaydar09
Предмет: История,
автор: kamfartem937
Предмет: Экономика,
автор: anastasij86