Есть ответ 👍

просто ответ без решения ​

227
402
Посмотреть ответы 2

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


№3 - 3

№4 - 18

№5 7( тут так, потому что знак нестрогий)

Ничего, что без таблицы истинности?


Должно работать и для двухзначного и для 3ехзначного и для 99999значного var a,sum: integer; begin readln(a); while a> 0 do begin sum: =sum+a mod 10; a: =a div   10; end; writeln(sum); end.

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