1) вывести квадраты чисел от 1 до 10 в столбик 2) ввести на экран 5 раз свое имя(иван)

Question

Информатика: 1) вывести квадраты чисел от 1 до 10 в столбик 2) ввести на экран 5 раз свое имя(иван)

elizavety · Answer

1) var i,kv:integer;beginfor i:=1 to 10 do beginkv:=i*i; writeln(kv); end;readln;end....