Ответы
Ответ дал:
0
Ответ:
var a,i:integer;
begin
write('Введите размер таблицы -> ');
readln(a);
writeln('- - - - - - - - - - - - - - - - -');
for i:=1 to a do
if (a mod 2 <> 0) then
writeln(i, ' ', i*i);
writeln('- - - - - - - - - - - - - - - - -');
end.
Объяснение:
вот
Вас заинтересует
1 год назад
1 год назад
6 лет назад
begin
write('Введите размер таблицы -> ');
readln(a);
writeln('- - - - - - - - - - - - - - - - -');
for i:=1 to a do
if (a mod 2 <> 0) then
writeln(i, ' ', i*i);
writeln('- - - - - - - - - - - - - - - - -');
end.