Найти количество двузначных чисел оканчивающихся на 7. Составить программу в Pascal.
Ответы на вопрос
Ответил nelle987
0
var count, i: integer;
begin
count := 0;
for i := 10 to 99 do
if i mod 10 = 7 then
count := count + 1;
writeln(count);
end.
begin
count := 0;
for i := 10 to 99 do
if i mod 10 = 7 then
count := count + 1;
writeln(count);
end.
Ответил Аноним
0
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
begin
Range(17,99,10).Count.Println
end.
Результат
9
// Внимание! Если программа не работает, обновите версию!
begin
Range(17,99,10).Count.Println
end.
Результат
9
Новые вопросы
Английский язык,
2 года назад
Обществознание,
2 года назад
Математика,
8 лет назад
Физика,
8 лет назад
Математика,
9 лет назад
Математика,
9 лет назад