2. Написать в Паскале (или в тетради) программы к заданиям. Использовать в цикле только...

+255 голосов
4.6m просмотров

2. Написать в Паскале (или в тетради) программы к заданиям. Использовать в цикле только оператор While. «3»: Вывести на экран в столбик 12 раз слово «Весна». «4»:Ввести натуральное число N и вывести кубы всех чисел от 1 до этого числа. «5»: Ввести два целых числа a и b (a ≤ b) и вывести квадраты всех чисел от a до b. Пример: Введите два числа: 4 5 4*4=16 5*5=25


Информатика (18 баллов) | 4.6m просмотров
Дан 1 ответ
+70 голосов

Ответ:

Объяснение:

Ответ:

3)

var

a:integer;

begin

a:=0;

 while a<12 do</p>

 begin

 writeln ('Весна');

 a:=a+1;

 end;

end.

4)

var

a,n:integer;

begin

 readln(n);

 a:=1;

 while a

 begin

 writeln (a*a*a);

 a:=a+1;

 end;

end.

5)

var

a,b:integer;

begin

 readln(a,b);

 while a begin

 writeln (a,'*',a,'=',sqr(a));

 a:=a+1;

 end;

end.


image
image
image
(520 баллов)