0. Линейные программы
1. Определите значение переменных a и b после выполнения фрагмента программы:
a := 1819;
b := (a div 100)*10+9;
a := (10*b–a) mod 100;
2. После выполнения фрагмента программы:
writeln(‘введите число ’)
readln(a);
x:=a Div 100;
writeln(x);
y:=a Mod 1000 - 1;
writeln(y);
на экран были выведены два числа 12 и 234.
Какое число ввёл пользователь?
3. Напишите программу, которая запрашивает у пользователя два числа и выводит на экран эти числа и их разность в виде таблицы. Например, при вводе чисел 8 и 3 на экране должна появиться такая таблица:
-------------------------------
| a | b | a–b |
-------------------------------
| 8 | 3 | 5 |
-------------------------------
4. Напишите программу, которая запрашивает трёхзначное число, а на экран выводит сумму его цифр.
5. Прошло k секунд. Определите, сколько это целых часов h и целых минут m. Например, для k = 13257 = 3*3600 + 40*60 + 57 ответом будет h=3 и m=40.
Ваша программа должна запрашивать k и выводить на экран h и m.