Написать программы для паскаля.
Напечатать "столбиком":
а) все целые числа от 20 до 35;
б) квадраты всех целых чисел от a до b (значение b вводится с клавиатуры; b≥10);
в) третьи степени всех целых чисел от a до 50 (значение a вводится с клавиатуры; a≤10);
г) все целые числа от a до b (значение a и b вводятся с клавиатуры; b≤a).
Ответы на вопрос
Ответил artempashkin
1
Ответ:
а) var i: integer;
begin
for i:=20 to 35 do writeln (i);
end.
б) var i, a: integer;
begin
read (a);
for i:=a to 50 do writeln (i*i);
end.
в) var i, a: integer;
begin
read (a);
for i:=a to 50 do writeln (i*i*i);
end.
г) var i, b, a: integer;
begin
read (a, b);
for i:=a to b do writeln (i);
end.
Объяснение:
нашёл в интернете, но всё же надеюсь помог
katastrofa02:
Уже успел найти/переписать программы, из того что я понял переделывая программы, часть программ в интернете не подходят для моих условий заданий (у меня условия задач отличаются от стандартных из-за чего они не работают), конкретнее - не работают б, в, г, там есть условия для значений a/b, должны ли они быть больше или меньше конкретных чисел. Но в любом случае спасибо.
Новые вопросы