Предмет: Информатика,
автор: shulginsasha20
введите 2 числа если их сумма равна 0 то на экране появляется yes иначе сумма уменьшается на 100(паскаль)
Ответы
Автор ответа:
0
var a,b,sum:integer;
begin
writeln('Введите два числа');
readln(a,b);
sum:=a+b;
if sum=0 then
writeln('Yes')
else
sum:=sum-100;
writeln(sum);
end.
begin
writeln('Введите два числа');
readln(a,b);
sum:=a+b;
if sum=0 then
writeln('Yes')
else
sum:=sum-100;
writeln(sum);
end.
Похожие вопросы
Предмет: Математика,
автор: muradrasu111
Предмет: История,
автор: fatalievauma484
Предмет: Английский язык,
автор: isssabayeva23
Предмет: Математика,
автор: математика317
Предмет: Математика,
автор: Ириска991