Вычислить Все Суммы Двухзначных Чисел

  • Автор темы antonborodin
  • Дата начала
A

antonborodin

#1
Помогите пожалуйста разобраться. Задача - составьте программу вычисления всех сумм двухзначных чисел на паскале.

Сделал а потом понял что это не то и теперь не могу понять что нужно. Вот что я сделал

Код:
program task;
var
a,b,x : integer;
const
error = 'Error! Enter two-digit number.';
begin
Write('Enter a =');
ReadLn(a);
if (a <= 99) and (a >= 10) then
begin
Write('Enter b =');
ReadLn(b);
if (b <= 99) and (b >= 10) then
begin
x := a+b;
WriteLn('a + b = ',x);
end
else
Write(error);
exit;
end
else
WriteLn(error);
exit;
end.
 

Cambur

Active member
20.06.2010
27
0
#2
привет! "вычисление всех сумм двухзначных чисел" - не понятно.
ты сделал "вычисление суммы при условии, что числа - двузначные"
можно сделать "сумму всех двузначных чисел" - просто просуммируй в цикле... наверное это и требуется.