<em>// PascalABC.NET 3.3, сборка 1547 от 07.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
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.
<u>Пример</u>
Введите три целых числа: 345423 -324342 1231
сумма нечетных равна 346654
Sqrt(a*a+b*b+c*d)/sqrt(a*b*c*d)
Ответ:
Объяснение:слово дорогой заменится на слово ветер.
Find what - найти
Replace - заменить
Если это паскаль, то вывод на экран можно выполнить так:
writeln('x = ',x);
Ответ:
F10 нажимай если уже все.
Объяснение: