Написать 2 программки на языке Паскаль1) Вывести на экран все творенья

Написать 2 программки на языке Паскаль

1) Вывести на экран все творения N на M,
M убавляется каждый раз на 2 до 0.
Пример:
Ввод M:=10; N:=3;
Вывод 30 24 18 12 6

2) N изменяется от 2 до 7, на экран выводиться M, которое одинаково N+X.
X вводиться с клавиатуры.
Пример:
Ввод X:=4;
Вывод 6 7 8 9 10 11

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

1) Var s, m, n:integer;

Begin

Write('m=') ;read(m) ;

Write('n=') ;read(n) ;

While mgt;0 do begin

Write(' ', m*n) ;

M:=m-2;

End;

End.

2) Var x, n:integer;

Begin

Write('x=') ;read(x) ;

For n:=2 to 7 do begin

Write(' ', n+x) ;end;

End.

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


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

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

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

Войти на сайт