Войти Регистрация Спроси ai-bota

Pascal найти сумму всех двухзначных чисел, которые кратны трём.

Ответ:

Мария13122002

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 оценок)

Ответ:

ataev0512

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 оценок)

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

fhderDgy

19.09.2022 07:58

Вывести на экран таблицу соответствия между весом в фунтах и весом в кг для значений от 1 до 20 с шагом в 1 фунт(1 фунт=400г) пример оформления результата: 1 фунт=0,4...

ArianTop

22.07.2020 04:09

Адрес компьютера в подсети школы указан следующим значением 192.168.101.128. выберите тот же адрес если он записан в 16-ой системе счисления 1) 300.250.145.200 2)...

mamatvoeymamy

22.07.2020 04:09

Как известно, автомобиль, изобретенный винтиком и шпун-тиком, работает не на бензине, а на газировке разных сортов. на одном литре лимонада он проезжает 120 км, на...

marinamih

02.05.2020 03:39

Дан фрагмент программы: int a=7 while a =98 print (a) a+=7 1) Напишите что означает каждое действие в программе. 2) Запишите результат выполнения программы....

GRIEZMAN789

25.04.2021 21:58

4) Для хранения в информационной системе документы сканируются с разрешением 600 ppi и цветовой системой, содержащей 224 = 16 777 216 цветов. Методы сжатия изображений...

Makar198043

14.03.2023 20:27

10. Сколько, по вашему мнению, существует систем программиро- вания?...

kotovad444

02.08.2021 11:27

Найди лишнее и зачеркни а)земля гора глобус река...

GrafGundam

26.07.2022 08:44

Что такое цифровые технологии?...

Soffa6110

24.11.2021 07:49

ОТ Работа с текстом! (T F)...

Bauer322

08.03.2020 23:50

Цикл легенд, присвячених образові княгині Ольги...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку