Составте программу ,которая выводит на экран 3 первых нечетных натуральных числа и находит сумму этих чисел

1

Ответы и объяснения

2014-01-09T00:18:36+04:00
Program gt;
var i,s:longint;
begin
for i:=1 to 5 do
if(i mod 2=1)then begin
write(i,' ');
s:=s+i;
end;
writeln;
writeln(s);
end.