Предмет:
ИнформатикаАвтор:
cassiebonillaАвтор:
lillianachristensenАвтор:
jaquanАвтор:
brenden4butvar
i, n : byte;
begin
repeat
write('введите n: ');
readln(n)
until n in [1..9];
writeln('таблица умножения');
for i := 1 to 9 do
writeln(n, ' * ', i, ' = ', n * i);
writeln('таблица сложения');
for i := 1 to 9 do
writeln(n, ' + ', i, ' = ', n + i);
readln
end.
Автор:
toriДобавить свой ответ
Предмет:
МатематикаАвтор:
begoñaОтветов:
Смотреть
Предмет:
БиологияАвтор:
basileowoodОтветов:
Смотреть
Предмет:
БиологияАвтор:
ice queenqb9hОтветов:
Смотреть