
Эмилий
5 год назад
Даны три целых числа.Напишите программу ,подсчитывающую сумму тех чисел ,которые являются нечетными
ОТВЕТЫ

Десислава
Oct 24, 2020
begin
var (a,b,c):=ReadInteger3('Введите три целых числа:');
var s:=0;
if a.IsOdd then s+=a;
if b.IsOdd then s+=b;
if c.IsOdd then s+=c;
Writeln('сумма нечетных равна ',s)
end.
Введите три целых числа: 345423 -324342 1231
сумма нечетных равна 346654
622
Смежные вопросы: