Предмет: Информатика, автор: milena030805

дано пятизначное число.Найти сумму квадрата его цифр

Ответы

Автор ответа: Аноним
0

Ответ:

For i:=1 to 5 do begin

Cifra:= num mod 10;

Num:= num div 10;

Sum:=sum+cifra*cifra;

End;

Объяснение:

Интересные вопросы
Предмет: Химия, автор: apastuhova91
Предмет: Физика, автор: KozhanovaVer