92

ПАСКАЛЬ! Найти сумму и количество натуральных чисел в интервале…

hammer61 08 марта 2023

ПАСКАЛЬ! Найти сумму и количество натуральных чисел в интервале от 0 до 50, оканчивающиеся на цифру k

категория: информатика

60

Uses crt; var i,k,kol,s: integer; beginkol: =0; s: =0; read (k); for i: =1 to 50 doif i mod 10=k thenbegininc (kol); s: =s+i; end; writeln (s); writeln (kol); end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Смотрите также:
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...