Найти сумму целого числа больше 5 в Паскале. Помогите пожалуйста! Заранее спасибо)

Question

36

Найти сумму целого числа больше 5 в Паскале. Помогите пожалуйста! Заранее спасибо)

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

brusnika · Accepted Answer

57

brusnika

10 февраля 2024

Программу из комментариев переписал для паскаля.var x,s: integer; beginread (x); x: =abs (x); s: =0; while x>0 do beginif x mod 10>5 then s: =s+x mod 10; x: =x div 10end; write (s) end.

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

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

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

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