Посчитать количество чисел, принадлежащих промежутку [a,b] и сумму чисел, стоящих на местах, кратных 3
лина28051
2
31.03.2019 08:40
10
Другие вопросы по теме Информатика
StayStr0g
02.10.2019 09:01
harchuk181002
02.10.2019 09:01
таня2022
02.10.2019 09:01
famina1998
02.10.2019 09:10
kate2224
02.10.2019 09:10
black95
02.10.2019 08:14
SofiLand854
02.10.2019 08:14
msfokkck
02.10.2019 07:47
Популярные вопросы
- Опышить склад молекулы углекислого газу CO2...
3 - Представь 2^56 в виде степени с основанием 2^28...
1 - Найдите объём который занимают 32 грамма оксида серы(4)...
1 - подставить слова unit 2 progress test a...
1 - Ученик спросил Мастера: «Насколько верны слова, что не в деньгах счастье Tom...
3 - Химия 8 клас (фото) Тема: Будова електронних оболонок атома Заранее )...
3 - Тестове завдання за поемою Іліада...
1 - 1) Почему Франция потеряла положение ведущего государства в континентальной Европе?2)...
3 - Завдання на фото(вибачте за якість фото)...
2 - Представьте в виде дроби -3а^3/2б^2÷(-а/4б^2) 9м^2-н^2/н^2÷(15м+5н)...
3
Program Pr1;
uses crt;
var a,b,c:integer;
Begin
clrscr;
c:=0;
writeln('Vvedite a i b');
readln(a,b);
while a<=b do begin
if a mod 3=0 then c:=c+1;
a:=a+1;
end;
writeln(c);
end.