Вычислить и вывести на печать значения переменных A=2*i B=2*i+1
при значениях i изменяющихся от 1 до 5

1

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

2013-11-08T01:27:48+04:00
Program Zadacha;
Var i: Integer;
BeginFor i := 1 To 5 Do
Begin
WriteLn('A = ', 2 * i);
WriteLn('B = ', 2 * i + 1);
End;
ReadLn;
End.