Ответы на вопрос:
Pascal: var a,b,c: integer; begin readln(a,b,c); if a=1 then writeln('true') else if b=1 then writeln('true') else if c=1 then writeln('true') else writeln('false') ; end.
Популярно: Информатика
-
Сколько кбайтов составляют 217 битов? распишите...
Amelka0614.11.2022 10:14 -
На вокзале 2 платформы, у каждой из них стоит поезд. девушка в справочном...
DinaraBergeneva11.05.2020 13:03 -
Написать и протестировать функцию, которая формирует новую строку на базе...
метрон21.06.2021 01:05 -
Известно, что ровно в двух пещерах из пяти есть клады. сколько битов нужно,...
Kondor133706.05.2023 03:16 -
Определить минимальный из положительных элементов массива a(n) и его порядковый...
Filipin203018.09.2022 10:22 -
Назовите основные правила ввода текста...
bakulya2005ma26.12.2022 21:18 -
Спо информатике,на переливание 1 ёмкость-10 литров(ёмкость заполнена) 2...
missapikova09.11.2021 18:47 -
Рассчитайте объём видеопамяти,необходимой для хранения графического изображения,занимающего...
penguin251731.08.2020 01:29 -
Какое минимальное основание n должно быть у системы счисления что бы в ней...
ekimmail63128.01.2021 04:25 -
Паскаль, сумма нечетных чисел (1-100), кратных 3...
MilankaMarkova04.04.2021 01:52