Var A,B,i : Integer;
Begin
Readln(A,B);
For i:=A to B do Writeln(Sqr(i));
end.
Задание в Excel или на языке программировнания?
<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadlnString.Replace('ма','ко').Println
end.
<u>Пример</u>
Тамара сломала куклу.
Такора слокола куклу.
10
первая единица показывает количество двоек, ноль показывает количество единиц.