Question

Помогите с PASCAL,число перевернул,а как разность и тд..найти не могу. Ошибки

Answer 1

Program A3;
var
a,b,c,mmod,ddiv,dddiv:integer;
begin
writeln('Введите числа: ');
readln(a);mmod:= a mod 10;
b:= a mod 100;
ddiv:= b div 10;
dddiv:= a div 100;
c:=mmod*100+ddiv*10+dddiv;
writeln('Разность 1ого и перевернутого числа  = ',a-c);
writeln('Произведение 1ого и перевернутого числа = ',a*c);
writeln('Разность перевернутого числа и 1ого = ',c-a);
writeln('Произведение перевернутого числа и 1ого  = ',c*a);
end.

Answer 2

ага)

Answer 3

Мне 16, тут считают не по дням, даже не по месяцам) а по годам, я 97 года, щас 14) поэтому типо 17

Answer 4

В файле код программы. 
Блин, пишите понятно, а то разность, произведение... я в украинской школе учился и хз что это.

7619225fa5db2e60129406c015ad9d6a.pas

Answer 5

смысл писать если 10 минут назад уже написали валид

Answer 6

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

Answer 7

НЕ полный валид xD

Answer 8

ВСЕМ СПАСИБО ЗА ОТВЕТЫ

Answer 9

НЕ ЗА ЧТО)