Предмет: Информатика,
автор: АртёмПлотников
Найти количество двузначных чисел оканчивающихся на 7. Составить программу в Pascal.
Ответы
Автор ответа:
5
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.
Автор ответа:
2
// 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
Похожие вопросы
Предмет: Английский язык,
автор: ik892473
Предмет: Химия,
автор: evgesha2828285
Предмет: Физика,
автор: deggeag169
Предмет: Химия,
автор: Julia20Julia
Предмет: Математика,
автор: Lilea12354