Есть ответ 👍

Объем ёмкости a равен 7 л, ёмкости b - 9 л. надо отмерить 1 л. информатика

123
230
Посмотреть ответы 2

Ответы на вопрос:


Набираем в в переливаем 2 раза в а набираем снова в и еще 2 в а

Function numsum(n: integer): integer; var d: integer; begin   d: =n mod 10;   if d=n then numsum: =n   else numsum: =d+numsum(n div 10) end; var a,b,d: integer; begin   write('введите два числа: '); read(a,b);   d: =numsum(a)-numsum(b);   if d> 0 then writeln('сумма цифр в первом числе больше')   else       if d< 0 then writeln('сумма цифр во втором числе больше')       else writeln('сумма цифр в обоих числах одинакова') end.

Популярно: Информатика