На Pascal.
Задача по Информатике:
Дана последовательность из 16 чисел(числа вводятся с клавиатуры). Подсчитать количество чисел оканчивающихся на шесть.
Ответы
Ответ дал:
0
var n, i, count: integer;
begin
count := 0;
for i := 1 to 16 do begin
read(n);
if n mod 10 = 6 then count := count + 1;
end;
writeln(count);
end.
begin
count := 0;
for i := 1 to 16 do begin
read(n);
if n mod 10 = 6 then count := count + 1;
end;
writeln(count);
end.
Ответ дал:
0
А что такое count?
Ответ дал:
0
это переменная, ее можно заменить любым другим словом/буквой
Ответ дал:
0
в данной программе она считает количество чисел, оканчивающихся на 6
Вас заинтересует
2 года назад
10 лет назад
10 лет назад
10 лет назад