Составить программу на языке Паскаль: С клавиатуры вводится любое целое число (тип integer). Определить (вывести на экран сообщение), является ли это число кратным 3.Пожалуйста быстрее!!!
Var a:real; begin write (‘ Введи число a’); readln (a); If a mod 3= 0 then write (‘ число кратно трём ‘) else write (‘число не кратно трём ‘); end.
Вот
а где у вас русскими словами нужно цифры написать?
Спасибо!!!!)))))
В смысле где?
где число не кратно трем
кратно трем
и где введи число а
внутри write можешь цифрами написать
спасибо
Пожалуйста