составить программу на языке паскаль среди двузначных нечётных чисел подсчитать количество тех сумма цифр которых кратна трем ответ
Novokshonovamariya
2
15.03.2021 11:46
0
Другие вопросы по теме Информатика
Vureshivatel
17.06.2019 03:10
саша2006101
12.05.2020 20:20
4444asas
12.05.2020 20:20
Anuraoaoap
12.05.2020 20:20
didlok
12.05.2020 20:21
GoldCoin
24.06.2019 02:50
asadhfdgj
28.11.2021 16:21
valerunik160val
29.09.2019 01:00
zlatochkagr
18.11.2020 10:32
Популярные вопросы
- Призма с высотой равной 6 см и основаниями: правильный шестиугольник...
1 - На числовой окружности отметьте точку с координатой а) 16пи/3 б) -7пи/6...
2 - Составить синонимические ряды с доминантами （а）говорить （б）идти （в）амбиция...
2 - 1. раскрытие скобки. вынесение общего множителя за скобки . вычисли...
2 - 1.преобразуйте в многочлен: а)( а – 3 )^2 б)( 2х + у )^2 в)( 5в – 4х...
3 - Хватит ли 1 кг угля для того, чтобы закипятить 1 кг воды при температуре...
3 - 2. рассмотрите следующие ситуации: б) мальчик тянет санки, прилагая...
1 - Движения автомобиля и пешехода по прямолинейному участку шоссе заданы...
2 - Движения двух автомобилей заданы уравнениями x1 = –300+20t и x2=15t....
3 - Найдите произведение всех целых чисел которые больше числа -4 и меньше...
1
var i,k,d,e,s:integer;
begin
k:=0;
for i:= 10 to 99 do
if i mod 2 = 1 then
begin
d:=i div 10;
e:=i mod 10;
s:=d+e;
if ((s mod 3) = 0) then
k:=k+1;
end;
writeln(k);
end.