В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
hzzzkzn99
hzzzkzn99
02.05.2020 01:54 •  Информатика

Нужен подробный ответ: вывести на экран значение логического выражения, которое принимает значение true, если к является двухзначным числом, кратным пяти и false – в противном случае.

Показать ответ
Ответ:
yasharks2013
yasharks2013
17.08.2020 07:23

Это первый вариант (но им лучше не пользуйся , ибо препод может придраться )

var  

a,b:integer;        

c:boolean;


begin


readln (a);


b:=0;


   begin  

   if (a div 10>0) then b:=b+1;


   if (a mod 5=0) then b:=b+1;


   end;


c:=b=2;


writeln (c);


end.

Вот второй вариант ( который не так сильна закручен )

var  

a:integer;


c:boolean;


begin


readln (a);


c:= (a div 10>0) and (a mod 5=0);


writeln (c);


end.

Объясняю второй вар:

var - мы вводим переменные

a:integer; - это значит что число а- целое

c: boolean; - вводим переменную которая дает истинность высказывания

begin - начало алгоритма

readln (a);- компуктер запросит  чтобы вы ввели переменную "a"

c:= (a div 10>0) and (a mod 5=0) - c будет истинен при том случае если a div 10>0 (при делении а на 10 целая часть будет больше 0) и a mod 5=0 (при делении a на 5 остаток будет 0)

writeln (с); - выводим с (True or False)

end. -конец алгоритма

Надеюсь, что понятно объяснил.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота