Внимание! center-referat.ru не продает дипломы, аттестаты об образовании и иные документы об образовании. Все услуги на сайте предоставляются исключительно в рамках законодательства.

Готовые дипломные, курсовые, рефераты. Вы можете бес-платно скачать любую понравившуюся работу.

Запишите алгоритм определения количества четных чисел среди заданных целых чисел A,B и...

Сегодня примерно в 16:46 на наш email ящик поступил вопрос, который наши модераторы от-несли к категории Разное. Постараемся дать на него полноценный ответ.

Тема вопроса с пояснением

Запишите алгоритм определения количества четных чисел среди заданных целых чисел A,B и С)

var
a,b,c,n:integer;
begin
n:=0;
readln(a);
readln(b);
readln(c);
if (a mod 2)=0 then
n:=n+1;
if (b mod 2)=0 then
n:=n+1;
if (c mod 2)=0 then
n:=n+1;
writeln('kolichestvo= ', n);
end.
Вопрос,объясните пожалуйста строчку "если(а ост. 2)=0,то n:=n+1") что?


Ответ с привлечением экспертов

Среди нашей команды есть эксперты, которые успешно отвечают на вопросы из рубрики "Информатика". Напомним, что вы задали следующий вопрос:

Запишите алгоритм определения количества четных чисел среди заданных целых чисел A,B и С)

var
a,b,c,n:integer;
begin
n:=0;
readln(a);
readln(b);
readln(c);
if (a mod 2)=0 then
n:=n+1;
if (b mod 2)=0 then
n:=n+1;
if (c mod 2)=0 then
n:=n+1;
writeln('kolichestvo= ', n);
end.
Вопрос,объясните пожалуйста строчку "если(а ост. 2)=0,то n:=n+1") что?


И сразу же ответим на него:

После проведенного совещания с другими специалистами нашего сервиса, мы склонны пола-гать, что правильный ответ на заданный вами вопрос будет звучать следующим образом:

if  a mod 2= 0  then - это ты проверяешь на четность

n:=0;

если условие соблюдается n:=n+1- то n:=0+1

Авторские права 2002-2021 center-referat.ru