Предмет: Информатика,
автор: xdgal1as
Помогите пожалуйста ) Надо написать программу на Pascal ) Суть заключается в следующем, программа должна выводить в итоге, вот такие вот значения (цикл должен присутствовать)
1 2 3 4
2 4 6 8
3 6 9 12
4 8 12 16
Ответы
Автор ответа:
0
var
a,j,i:integer;
begin
for i:=1 to 4 do
begin a:=i;
for j:=1 to 4 do
begin
write(a,' ');
a:=a+i;
end;
writeln;
end;
end.
a,j,i:integer;
begin
for i:=1 to 4 do
begin a:=i;
for j:=1 to 4 do
begin
write(a,' ');
a:=a+i;
end;
writeln;
end;
end.
Интересные вопросы
Предмет: Геометрия,
автор: varanicadajana
Предмет: География,
автор: elviraahkmetvaleeva
Предмет: Қазақ тiлi,
автор: fru1ttea
Предмет: Физика,
автор: VikaSolomonova