Дано пятизначное число.найти сумму квадрата его цифр
Turbik327
2
17.05.2019 05:21
6
Другие вопросы по теме Информатика
kuchatrupov47
31.05.2019 02:40
podgainiyroma
16.05.2019 12:31
euno
16.05.2019 12:34
380974769507p06wmj
16.05.2019 12:38
kristimilafffka
16.05.2019 12:39
Грамбит
27.07.2019 15:50
Eugenrar
27.07.2019 15:50
умнаяпсина1
27.07.2019 15:50
angel2112001
05.08.2019 14:00
Популярные вопросы
- Как определить ,какой формулой задана прямая , проходящая через точки...
3 - Сатирическая характеристика всех помещиков в поэме мертвые души .сам...
1 - Подготовить рассказ о любом животном по плану 1) где живёт это животное?...
3 - 1.какие слои населения в афинах и почему выступали за войну? какие слои...
3 - 1)вычисли массу кальция, прореагировавшего с 80 г кислорода, если в результате...
2 - Верно ли высказывание: равенство | –m | = m верно при любых значениях...
1 - Возможна ли такая идеальная тепловая машина, которая за цикл получает...
1 - Определите массовую долю(%) сульфата меди в растворе, полученном при...
1 - 60 за решение. как гласит летопись татарские орды впервые пришли в крым...
3 - Подготовить сообщение о доме коми народа в древности. 20...
2
For i:=1 to 5 do begin
Cifra:= num mod 10;
Num:= num div 10;
Sum:=sum+cifra*cifra;
End;
Объяснение: