Дано трехзначное число если оно является перевертышем найти сумму…

Question

Дано трехзначное число если оно является перевертышем найти сумму цифр этого числа, а если нет то произведение цифр этогочисла

Answer 1

45

madloony

02 февраля 2023

var st: string; i,tmp,res,err: integer; begin readln (st); if (st[1]=st[3]) then for i: =1 to 3 do begin val (st[i],tmp,err); res: =res+tmp; end else begin res: =1; for i: =1 to 3 do begin val (st[i],tmp,err); res: =res*tmp; end; end; writeln (res); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: