Помогите найти сумму чисел от 10 до 99 кратных и 2 и 3 в Паскале ABC
Ответы:
01-10-2018 10:57
Var i,sum:integer;Begin for i:= 10 to 99 do if ((i mod 2) = 0) and ((i mod 3)=0) then sum:=sum+i; write(sum);End.
Также наши пользователи интересуются:
Mum always says that she is very funny and kind she likes animals and she can sing really well переводите пожалуйстаКакие из солей Na2SO4, AlCl3, K2CO3, KCl подвергаются гидролизу? Составьте молекулярные и ио?
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Помогите найти сумму чисел от 10 до 99 кратных и 2 и 3 в Паскале ABC» от пользователя Милана Шевченко в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!