Даны 3 двухзначных числа . Выяснить , сколько из них начинаются цифрой 7 ?
Const n=3; var x,i, count: integer; begin for i:=1 to n do begin read(x); if (x div 10) = 7 then inc(count); end; writeln(count); end. Проверка работы: Введенные данные: 56 76 73 Вывод: 2