Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Мертвый0Анархист
31.08.2022 05:08 •
Информатика
Pascal найти сумму всех двухзначных чисел, которые кратны трём.
Показать ответ
Ответ:
akena0932
26.06.2020 23:04
Uses crt;
var ,c,k:integer;
begin c:=0;
for k:=10 to 99 do
if (k mod 3=0) then c:=c+k;
write(c);
end.
0,0
(0 оценок)
Ответ:
rebecca332
26.06.2020 23:04
Uses crt;
var i,sum:integer;
begin
sum:=0;
for i:=10 to 99 do
if i mod 3=0 then sum:=sum+i;
writeln(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Katya149555
11.03.2020 20:50
Заполнить двумерный массив Nх N случайными числами из интервала [-10; 10]. В каждой строке этого массива найти количество элементов, меньших среднего арифметического всех элементов...
zalina163
27.09.2020 22:54
Во встроенной среде обработки вам необходимо создать программу для преобразования количества информации в битах в байты, килобайты и мегабайты....
katya99ov
26.09.2022 02:52
Как выполняется возведение числа в степень?в информатике...
AlinaFirdysovna5
08.01.2022 01:04
2.2.Если n = 5, каков результат выполнения псевдокода? Алг Умножение чисел (arg целое число n, целое число P) для |n 0 вычислить |P=1*2*3*...*n при целом i ввод n; P:=1 нц для...
marina4010
17.11.2022 04:28
Величини змінні та постійні величини 5-6 речень...
atamanova91
30.08.2021 13:47
Что такое псевдокод? * запись на естественном языкеизображение из графических символовполуформализованное описание алгоритмов на условном алгоритмическом языкетексты на языке...
malyovana2014
08.03.2022 09:08
Какой оператор работает в языке программирования Python как условный цикл?...
podynov8807
20.08.2020 02:56
нужно СОР ПО Инфоформатике ...
sgymgjvb
18.04.2022 17:56
я за ранние всё на фотографии 3. Заполни пустые ячейки блок-схемы, опираясь на псевдокод1. i=32. count=13. Начало циклапроверка условия i≤24(пока оно истинно)выполнит;a)count=count...
M4KAR
13.01.2020 12:31
3**. Найди математическое выражение, записи выражения на языке Python. 1) (p + k * 4) / (4*t) - 4*p*k / (3 - 2*b) 2) abs (4*x) + (3 - 3*x) / 5 * y 3) 3*x * (x ** 3 - 47 + 2*y)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var ,c,k:integer;
begin c:=0;
for k:=10 to 99 do
if (k mod 3=0) then c:=c+k;
write(c);
end.
var i,sum:integer;
begin
sum:=0;
for i:=10 to 99 do
if i mod 3=0 then sum:=sum+i;
writeln(sum);
end.