Посчитать количество чисел, принадлежащих промежутку [a,b] и сумму чисел, стоящих…

Question

53

Посчитать количество чисел, принадлежащих промежутку [a,b] и сумму чисел, стоящих на местах, кратных 3

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

ответить

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

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

priemnik · Accepted Answer

43

priemnik

01 апреля 2023

Program Pr1; uses crt; var a,b,c: integer; Beginclrscr; 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.

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

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

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

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