Напечатать столбиком : a) все целые числа от 10 до 35;

Напечатать столбиком : a) все целые числа от 10 до 35; b) квадраты все целых чисел от 5 до n; c) третьи ступени всех целых чисел от а до 50; d) все целые числа от а до b.Использовать оператор While

Задать свой вопрос
1 ответ

а) program zz1;

var c:integer; // задаем переменную целого типа

begin

c:=10; // задаем изначальное значение

while c lt;= 35 do // организуем цикл, пока переменная не достигнет последнего значения

begin

writeln(c);  // выводим ответ

c:=c + 1;

end;

end.

  1. b) program zz1;

var c, n:integer; // задаем переменные целого типа

begin

read(n);

c:=5; // задаем изначальное значение

while c lt;= n do // организуем цикл, пока переменная не достигнет заключительного значения

begin

writeln(c*c);  // выводим ответ

c:=c + 1;

end;

end.

  1. c) program zz1;

var a:integer; // задаем переменную целого типа

begin

read(a);

while a lt;= 50 do // организуем цикл, пока переменная не достигнет заключительного значения

begin

writeln(a*a*a);  // выводим ответ

a:=a + 1;

end;

end.

  1. d) program zz1;

var a, b:integer; // задаем переменные целого типа

begin

read(a, b);

while a lt;= b do // организуем цикл, пока переменная не достигнет заключительного значения

begin

writeln(a);  // выводим ответ

a:=a + 1;

end;

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт