Написать программы для паскаля.
Напечатать "столбиком":
а) все целые числа от 20 до 35;
б) квадраты всех целых чисел от a до b (значение b вводится с клавиатуры; b≥10);
в) третьи степени всех целых чисел от a до 50 (значение a вводится с клавиатуры; a≤10);
г) все целые числа от a до b (значение a и b вводятся с клавиатуры; b≤a).
Напечатать "столбиком":
а) все целые числа от 20 до 35;
б) квадраты всех целых чисел от a до b (значение b вводится с клавиатуры; b≥10);
в) третьи степени всех целых чисел от a до 50 (значение a вводится с клавиатуры; a≤10);
г) все целые числа от a до b (значение a и b вводятся с клавиатуры; b≤a).
More Questions From This User See All
Answers & Comments
Ответ:
а) 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.
Объяснение:
нашёл в интернете, но всё же надеюсь помог