задача 2 урок 10

Primary tabs

Submitted by Ilia_Sem on Sat, 10/23/2021 - 16:33

program training;

{$mode objfpc}{$H+}

uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Classes
{ you can add units after this };

begin
a := readln('')
i := for a to 1 do
writenl(i : 5)
end.