Дано три будь-яких числа. Знайти обуток тих, що кратні 3. ПРОГРАМА ПАСКАЛЬ

Ответы:

Мария Бакулева

15-03-2012 05:40

program ima;uaes crt;var a,s,d:integer;readln (a);readln(s);readln(d);if (a mod 3)and(s mod 3)and(d mod 3)thenreadln (a,s,d);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Ярослава Щучка

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Дано три будь-яких числа. Знайти обуток тих, що кратні 3. ПРОГРАМА ПАСКАЛЬ» от пользователя Ярослава Щучка в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!