Вопрос по информатике:
Найти сумму цифр от 300 до 500. Это надо сделать в программе ПАСКАЛЬ. Напишите пжл.
- 23.07.2018 13:26
- Информатика
- remove_red_eye 15384
- thumb_up 39
Ответы и объяснения 2
Var sot,des,ed,k,summa :integer;
begin
for k:=300 to 500 do
begin
sot:=k div 100;
des:=k mod 100;
des:=des div 10;
ed:=k mod 10;
summa:=summa+(sot+des+ed);
end;
writeln(summa);
end.
- 25.07.2018 11:03
- thumb_up 27
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.