


Программирование
+4Программа на Паскаль
Здравствуйте. Если есть профессионалы по этой теме, прошу мне написать программу, которая выведет мне таблицу, как показано на фото ниже. Пропустил 2 урока и теперь не знаю как это сделать, однако одноклассники даже помочь не хотят. В прочем я иногда умудрялся списать с нейросети, а вот щас уже она не в состоянии сделать даже такое.
Заранее спасибо!

По дате
По рейтингу
1234567891011121314151617
program addition_table;
var
i, j: integer;
begin
writeln('Таблица сложения');
write(' ');
for i := 1 to 9 do
write(i:3); // выводим верхнюю строку с числами от 1 до 9
writeln;
for i := 1 to 9 do
begin
write(i:2, ' '); // выводим левый столбец с числами от 1 до 9
for j := 1 to 9 do
write(i + j:3); // выводим результат сложения i и j
writeln; // переходим на новую строку
end;
end.
Больше по теме