Добрый день.Помогите пожалуйста решить задачу на Paskal. Подсчитать сумму двухзначных чисел,сумма которых не превышает 7.
Добрый день.Помогите пожалуйста решить задачу на Paskal.
Подсчитать сумму двухзначных чисел,сумма которых не превышает 7.
Гость
Ответ(ы) на вопрос:
ГостьОтвет лёгок. Пример: 43+(-40); 59+(-55) и т.д.
ГостьProgram test;
Var
i, i1:integer;
Begin
For i:=10 to 99 do begin
For i1:=10 to 99 do begin
if i-i1 < 7 then writeln(i,' + (-', i1,') =', i-i1);
End;
End;
End.
Не нашли ответ?
Похожие вопросы