Составьте программу позволяющую проверить умение выполнить сложение двух целых чисел,...

Question

Составьте программу позволяющую проверить умение выполнить сложение двух целых чисел, каждая из которых не больше ста.
p.s. Чуваки, от этого зависит моя четвертная оценка.

Answer 1

var

a,b,s : integer;

begin

writeln('введите 1 число которое не больше 100');

readln(a);

writeln('введите 2 число которое не больше 100');

readln(b);

if (a=>100) and (b=>100)  then

writeln('я же говорил(а) не больше ста заново вводи!!!! ')

else

s:=a+b;

begin

writeln('Получилось = ',s);

end;

end.