Предмет: Информатика, автор: letaus1974Artur

напишите программу решения задачи. даны веществ числа a.b
.c .Определите будет ли их сумма положительной

Ответы

Автор ответа: farodis
0
var  a,b,c:integer;beginwriteln('Введите значение a: ');readln(a);writeln('Введите значение b: ');readln(b);writeln('Введите значение c: ');readln(c);if a+b+c>0 then writeln('Сумма чисел положительная')elsewriteln('Сумма чисел отрицательная');end.

farodis: var
a,b,c:integer;
begin
writeln('Введите значение a: ');
readln(a);
writeln('Введите значение b: ');
readln(b);
writeln('Введите значение c: ');
readln(c);
if a+b+c>0 then writeln('Сумма чисел положительная')
else
writeln('Сумма чисел отрицательная');
end.
Похожие вопросы
Предмет: Математика, автор: gamechennel0313