
Михайлович
6 год назад
Вычислить и напечатать значения функции y=x^2 для x от 1 до 10 с шагом 1 ( используя цикл for )
ОТВЕТЫ

Aleksej
Oct 24, 2020
Var
x:byte;
Begin
WriteLn('f(x) = x^2');
For x:= 1 to 10 do
WriteLn('f(',x,') = ',x*x)
End.
x:byte;
Begin
WriteLn('f(x) = x^2');
For x:= 1 to 10 do
WriteLn('f(',x,') = ',x*x)
End.
650
Смежные вопросы: