Программа нахождения произведения нечетных цифр двузначных чисел от 30 до 40. напишите на паскаль.
Катюха808
1
21.05.2019 22:27
0
Другие вопросы по теме Информатика
NaightMar
29.03.2020 19:35
Зафар1234567890
29.03.2020 19:55
соня1572
29.03.2020 19:56
v201612
29.03.2020 19:58
Dima25688
26.02.2021 08:31
8479
26.02.2021 08:36
Alinka291002
02.10.2019 14:57
nastyachurkina
02.10.2019 15:00
Популярные вопросы
- 1.Установіть відповідність між правилом відокремлення означень та прикладом....
2 - Небольшая шайба скользит по гладкой горизонтальной поверхности стола...
1 - Господиня маючи певну кількість грошей, може купити 1 курку і 1 качан...
1 - Прізвище , яке взяв собі Міщенко? Твір Русалонька із 7-В...
1 - нужно нарисовать отрезок AB и прямую r перпендикулярно данному отрезку....
1 - каких значениях переменной алгебраическая дробь 24t3−54t2+24t+36 не...
3 - Приведите примеры регуляторных механизмов в организме, направленные...
1 - Астрономия напишите каждый пункт с решением...
3 - Знайти площу трикутника, утвореного осями координат та дотичною до графіка...
3 - Визначте об єм газу (н.у.),який утв. при взаємодії 2,4г магнію з розчином...
1
Var a,i:integer;
Begin
A:=1;
For i:=30 to 40 do
Begin
If i mod 10 mod 2 =1 then
A:=a*(i mod 10);
If i div 10 mod 2 =1 then
A:=a*(i div 10);
End;
End.