Напишите процедуру в паскале, которая выводит на экран в столбик все числа от 0 до n
136
296
Ответы на вопрос:
Для процедуры тут слишком мало команд. смысла создавать ее нет. begin readln(n); writeln('0') for i: =1 to n do writeln(i); readln; end.
const
n = 3;
var
a: array[1..n, 1..n] of integer;
j, i, s: integer;
begin
randomize;
writeln('случайная матрица: ');
for i : = 1 to n do
begin
for j : = 1 to n do
begin
a[i, j] : = random(51) - 25;
write(a[i, j]: 5);
end;
writeln
end;
for i : = 1 to n do
begin
j : = n + 1 - i;
s : = s + a[i, j];
end;
writeln('сумма элементов побочной диагонали: ', s);
readln
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
yeri222.06.2021 06:27
-
ученица200222220.06.2021 14:15
-
Аня2004133413.04.2021 23:37
-
сердянечок15.04.2020 06:00
-
элог24.08.2020 09:31
-
Zipchik16.06.2020 20:02
-
Natiman24.07.2022 13:47
-
tromed201116.11.2021 08:53
-
2zeo91511.09.2021 06:57
-
LEHA671223.08.2020 05:49

Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.