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

0 голосов

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


image

спросил от (31 баллов) в категории Информатика
оставил комментарий от Начинающий (452 баллов)

разность 1ого и перевернутого числа

оставил комментарий от Начинающий (452 баллов)

a=обычное c=перевернутое соответственно)

оставил комментарий от Начинающий (452 баллов)

Только разность надо или что-то еще?

оставил комментарий от Начинающий (452 баллов)

Что за провакационные вопросы?)

оставил комментарий от Одаренный (1.3k баллов)

тогда я правильно записал

оставил комментарий от Начинающий (452 баллов)

произведение это УМНОЖИТЬ)

оставил комментарий от Одаренный (1.3k баллов)

а произведение плюс?

оставил комментарий от Начинающий (452 баллов)

Разность это МИНУС)

оставил комментарий от Одаренный (1.3k баллов)

разность это деление?

оставил комментарий от Начинающий (452 баллов)

Оно не?

2 Ответы
0 голосов
ответил от Одаренный (1.3k баллов)
 
Лучший ответ

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

оставил комментарий от (31 баллов)

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

оставил комментарий от Одаренный (1.3k баллов)

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

оставил комментарий от Одаренный (1.3k баллов)

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

оставил комментарий от Начинающий (452 баллов)

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

оставил комментарий от Одаренный (1.3k баллов)

но но лично написал

оставил комментарий от Начинающий (452 баллов)

копипаст :D

оставил комментарий от Начинающий (452 баллов)

НЕ ЗА ЧТО)

0 голосов
ответил от Начинающий (452 баллов)

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.

оставил комментарий от Одаренный (1.3k баллов)

тоже студент?

оставил комментарий от Начинающий (452 баллов)

ага)

оставил комментарий от Одаренный (1.3k баллов)

ясно, а я то думаю с хера ли мне 18 xD

оставил комментарий от Начинающий (452 баллов)

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

оставил комментарий от Одаренный (1.3k баллов)

ахахах, прости, прости... я напутал)) просто не заметил что-у тебя нету вывода "перевертыша" xD, а так все правильно. мой косяк ))

оставил комментарий от Начинающий (452 баллов)

Лалка

оставил комментарий от Одаренный (1.3k баллов)

xD

оставил комментарий от Одаренный (1.3k баллов)

я думал раз тебе 17 так студент уже

оставил комментарий от Начинающий (452 баллов)

Шкальник)

оставил комментарий от Одаренный (1.3k баллов)

ахах

...