Написать 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
aizhan05
2
14.04.2019 17:44
0
Другие вопросы по теме Информатика
Сыймык111
19.01.2021 21:01
margaretpodkur
19.01.2021 21:03
olardaniil2017
19.01.2021 21:04
Shkola17032004
01.12.2021 07:13
чувак65
16.04.2020 10:30
ainura8326
16.04.2020 10:30
pikulev
16.04.2020 10:31
Pandorica
24.08.2019 08:00
Популярные вопросы
- Особые жизненные ситуации а которых оказываться люди разного...
2 - Решить (с условием) ученый с мировым именем иннокентий решил...
3 - Посмотрите , правильно ли я написал сочинение 15.2 1)композитор...
1 - Формулировкой второго закона ньютона...
3 - Определите какое слово обозночает признак предмет а)сварка б)...
2 - Реактивом на сульфат натрия может служить раствор 1) agno3 2)...
3 - Уякому рядку всі слова однозначні: 1.закон день лікар 2.медикаменти...
1 - Почему оказался возможной дуэль онегина и ленского (6 глава)...
3 - Чему ровна сила тяжести , действующая на тело массой 850грамм...
2 - Найдите площадь ромба, если егг диагонали равны 5 см и 12 см....
1
1) Var s, m, n:integer;
Begin
Write('m=') ;read(m) ;
Write('n=') ;read(n) ;
While m>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.