Вопрос по информатике:
Вычислить кубы чисел от 10 до 20 в Паскале. Используя три цикла: for, while, repeat
- 12.03.2018 08:21
- Информатика
- remove_red_eye 9183
- thumb_up 9
Ответы и объяснения 1
____________for____________
var i:integer;
begin
for i:=10 to 20 do
writeln(i,'^3 = ', i*i*i);
end.
_________while____________
var i:integer;
begin
i:=10;
while i<=20 do
begin
writeln(i,'^3 = ', i*i*i);
inc(i);
end;
end.
__________repeat_________
var i:integer;
begin
i:=10;
repeat
writeln(i,'^3 = ', i*i*i);
inc(i);
until i>20;
end.
- 13.03.2018 14:14
- thumb_up 22
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.