задача 4 урок 10
Primary tabs
program training;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Classes
{ you can add units after this };
begin
i := for 35 to 117 do
if((i mod 3) = 0) AND ((i mod 2) = 1,2,3,4,5,6,7,8,9 )
writeln(' i : 3 ')
end.
- Ilia_Sem's blog
- Log in to post comments
- 2076 reads