Паскаль 1. Вывести на экран таблицу умноженияА) 9Б) 22. Вывести на

Паскаль
1. Вывести на экран таблицу умножения
А) 9
Б) 2
2. Вывести на экран все естественные числа от 1 до 10 и подходящие им ступени числа 2:
1 2
2 4
3 8
4 16
...
10 1024
3. Вывести на экран все естественные числа от 3 до 15 и подходящие им чётные числа, которые получаются из их умножением не 2:
3 6
4 8
5 10
...
15 30

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

Ответ:

1. а)

var a, i: integer;

begin

a:=9;

for i:=0 to 9 do begin

writeln (a*i);

end;

end.

1. б)

var a, i: integer;

begin

a:=2;

for i:=0 to 9 do begin

writeln (a*i);

end;

end.

2. (здесь только вывод чисел от 1 до 10)

var i:integer;

begin

for i:=1 to 10 do begin

writeln (i);

end;

end.

3.

var i, a:integer;

begin

for i:=3 to 15 do begin  

a:=i*2;

writeln (i, ' подходящее число = ' a);

end;

end.

Изъясненье:

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


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

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

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

Войти на сайт