73+(37-12)*15=73+ 25*15=73+375=448
1)
// PascalABC.NET 3.3
begin
var n:=ReadInteger('n =');
Range(1,n).Select(i->i*i).Println;
end.
Пример:
n = 5
1 4 9 16 25
2)
<span>var n,i: integer;
begin
write('N = ');
readln(n);
i:=0;
while (i<n) do
begin
i:=i+1;
write(i*i,' ');
end;
end<span>.
3)
var n,i: integer;
begin
write('N = ');
readln(n);
i:=0;
repeat
i:=i+1;
write(i*i,' ');
until i=n;
end.
Пример:
<span>N = 5
1 4 9 16 25</span></span></span>
Мне кажется, что неправильно сказано, где написано, что благодаря этому огурцы будут тверденькими. Т. к. огурцы сами по себе твердые