( Самостоятельная работа Операторы цикла программ : 1. хитрая выводит ** экран все целые...

Question

( Самостоятельная работа Операторы цикла программ : 1. хитрая выводит на экран все целые числа от 1 до 20 ( в порядке возрастания 2. которая выводит на экран все целые нечетные числа от 1 до 19 ( в порядке 3. которая выводит на экран все целые числа от 20 до 5 ( в порядке убывания 4. выводит на экран значения функции для всех целых х нарезку 5. шпорах выводит на экран значения функции для всех целых х отрезку и изменяющихся с интервалом 0,5 0. которая выводит на экран все целые числа от 1 до 10. Квадраты этих чисел и кубы зги чисел в следующем виде 1 1 1 2 4 8 3 9 2 7 4 16 64

---

Answer 1

Первая задача
var i:integer;beginfor i:=1 to 20 do   write(i,' ');end.
Вторая задача
var i:integer;beginfor i:=1 to 19 do   if (i mod 2)=1 then write(i,' ');end.
Третья задача
var i:integer;beginfor i:=20 downto 5 do   write(i,' ');end.
Четвертая задача
var i:integer;beginfor i:=-5 to 5 do   write(i*i,' ');end.
Пятая задача
var i:real;begini:=-3;while i<=3 do begin   write(i*i,' ');   i:=i+0.5;   end;end.<br>Шестая задача
var i:integer;beginfor i:=1 to 10 do   writeln(i,'   ',i*i,'   ',i*i*i);end.

Comments

Они слиплись здесь почему - то, поэтому после integer; begin do ; делай enter