Категория - Информатика Автор - 112233445577889900 6 лет назад Определите, что делают следующие программы, и дополните команду вывода. var x: integer; a: boolean; begin write(ꞌВведите x =ꞌ); read(x); a := x mod 10 = 0; write(ꞌЧисло ... — ꞌ,a); end.
Категория - Информатика Автор - 112233445577889900 6 лет назад Определите, что делают следующие программы, и дополните команду вывода. var x: integer; a: boolean; begin write(ꞌВведите x =ꞌ); read(x); a := x mod 10 = 0; write(ꞌЧисло ... — ꞌ,a); end.
Ответ Автор - fdefas Программа определяет кратно число 10 или нет. Если кратно печатает True, если нет печатает False.Вывод можно дополнить так:write('Число ',x,' — ',a);