СОСТАВЛЕНИЕ ЗАДАЧИ (задачи «наоборот») 2.1. var n,i,a,k: integer;
begin
readln(n);
k := 0;
for i := 1 to n do begin
readln(a);
if (a mod 3 = 0) and(a mod 10 = 2)
then k := k + 1;
end;
writeln(k)
end.

Question

Информатика: СОСТАВЛЕНИЕ ЗАДАЧИ (задачи «наоборот») 2.1. var n,i,a,k: integer; begin readln(n); k := 0; for i := 1 to n do begin readln(a); if (a mod 3 = 0) and(a mod 10 = 2) then k := k + 1; end; writeln(k) end.

Lulu117 · Accepted Answer

Поисковые системы создали с целью удобного и быстрого поиска различной интересующей вас информации. Они в один миг находят необходимую информацию по назначенным ссылкам и адресам. Образовались поисковые системы больше 10 лет тому назад. В то время они могли выполнить только одну функцию отбора ссылок к недавно разработанным веб - страницам. В начале развития интернета пользователей было мало и следовательно количество информации было низким. Тогда поиск необходимой информации не был так актуален,...

СОСТАВЛЕНИЕ ЗАДАЧИ (задачи «наоборот») 2.1. var n,i,a,k: integer; begin readln(n); k := 0; for i := 1 to n do begin readln(a); if (a mod 3 = 0) and(a mod 10 = 2) then k := k + 1; end; writeln(k) end.

MOGZ ответил

СОСТАВЛЕНИЕ ЗАДАЧИ (задачи «наоборот») 2.1. var n,i,a,k: integer;
begin
readln(n);
k := 0;
for i := 1 to n do begin
readln(a);
if (a mod 3 = 0) and(a mod 10 = 2)
then k := k + 1;
end;
writeln(k)
end.