Вопрос школьника по предмету Информатика
Напишите программу заполнения массива А[1:50] числом 1
Ответ учителя по предмету Информатика
// PascalABC.NET 3.2, сборка 1401 от 14.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrFill(50,1); a.Println
end.
Замечание: полученный массив имеет 50 элементов, но индексы [0..49]
2. «Школьный вариант»
var
a:array[1..50] of integer;
i:integer;
begin
for i:=1 to 50 do begin
a[i]:=1;
Write(a[i]:2)
end;
Writeln
end.
Похожие вопросы от пользователей
Леса в Росии расположены в климатическом поясе.
Срочно!пожалуйста
Белый медведь,степная дыбка,певчий дрозд,олеандровый бражник,филин,зубр,священный скарабей,кречет,жук красотел,дикий северный олень,амурский тигр,клёст еловик.