Напишите программу для задачи: На паскале- вывести на экран N чисел в прямом порядке то есть 1,2....*n 30 БАЛЛОВ!!!!
Answers & Comments
iowisp3
1. var i,n:integer; begin read(n); for i:=1 to n do write(i,', '); end. 2. var i,n:integer; begin n:=9; for i:=1 to n do writeln(i,'*',n,'=',n*i); readln(i); end.
0 votes Thanks 1
nastyadavis
Это по уроку программу составить ,писать7
iowisp3
Суть программы не изменится, если добавить строку "Writeln('Введите n')"
iowisp3
Это строчка лишь выведет на экран cообщение "Введите n" перед вводом Вами числа
Answers & Comments
var
i,n:integer;
begin
read(n);
for i:=1 to n do
write(i,', ');
end.
2.
var
i,n:integer;
begin
n:=9;
for i:=1 to n do
writeln(i,'*',n,'=',n*i);
readln(i);
end.