1. Переменные А, К,– целые 2. Переменной С присвоить разность Х и У
3. Ввести переменную R
4. Вывести переменную К с
Комментариями К=
5. Если X больше У то X уменьшить в 2 раз, иначе переменную У увеличить на 10
6. Переменную F увеличить в 4 раза​

program programxy; const n=100;

var inputtext : integer; begin    randomize;

var x : = random(n) + 1;

var y : = random(n) + 1;

var z : = x - y;

writeln('решите пример: ', x, ' - ', y, ' = ');

readln(inputtext);

if inputtext = z then      writeln('правильно! ')

else      writeln('вы ошиблись! правильный ответ: ', z)

end.

где-то так это выглядит на паскале. ошибки не обработаны, так что, если вместо числа ввести строку - программа умрет по исключению.

телевидение

радиовещание

интернет

газеты и т.д 

800*600*24*4/8=5760000 байт=5625 кбайт

бухгалтерия, документооборот.