Вопрос по информатике:
ПОМОГИТЕ, ПОЖАЛУЙСТА, СРОЧНО НУЖНО!
делать нужно в паскале:
составьте 3 программы, используя FOR, WHILE и REPEAT: распечатать последовательность чисел 3, 6, 9, 12, ...20 и найти их сумму
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 24.07.2018 14:07
- Информатика
- remove_red_eye 16472
- thumb_up 48
Ответы и объяснения 1
//Pascal
var
a, s: integer;
i: integer;
begin
//цикл for
s := 0;
for i := 0 to 20 div 3 do
s := s + i*3;
writeln(s);
//цикл while
i := 3;
s := 0;
while i <= 20 do
begin
s := s + i;
i := i + 3;
end;
writeln(s);
//цикл repeat
i := 3;
s := 0;
repeat
s := s + i;
i := i + 3;
until i > 20;
writeln(s);
end.
- 25.07.2018 05:47
- thumb_up 3
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.