Написать программу находящую сумму всех трехзначных чисел, в записи которых есть…

Question

51

Написать программу находящую сумму всех трехзначных чисел, в записи которых есть четныецифры

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

shyshkovsky · Accepted Answer

88

shyshkovsky

04 марта 2023

var a,b,c,d,j: integer; begin j: =0; for a: =100 to 112 do begin b: =a div 10; d: =a mod 10; c: =a- (100*b) -d; if (a div 2=a/2) or (b div 2=b/2) or (c div 2=c/2) then j: =j+1; end; writeln (j); end. Это для pascalABC

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: