Предмет: Информатика,
автор: VitaVia
60б. Ребят, пожалуйста помогите. ПАСКАЛЬ АВС. Напишите процедуру, которая принимает параметр – натуральное число N – и выводит на экран линию из N символов '–'
Ответы
Автор ответа:
0
program gt;
var n:longint;
procedure Liniya(N: longint);
var i:longint;
begin
for i:=1 to n do
write('-');
end;
begin
readln(n);
Liniya(n);
end.
var n:longint;
procedure Liniya(N: longint);
var i:longint;
begin
for i:=1 to n do
write('-');
end;
begin
readln(n);
Liniya(n);
end.
Интересные вопросы
Предмет: История,
автор: yuliya971
Предмет: Литература,
автор: bako1619
Предмет: Информатика,
автор: akchurina08
Предмет: Математика,
автор: 342625