logo
Войти Регистрация Спроси ai-bota


Zacloock
07.06.2022 17:50

Составить программу нахождения наибольшего из трёх чисел и проверить кратно ли это число трём в паскале авс

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
kek22821
kek22821
26.04.2020 15:58
В информационной модели жилого дома , представленной в виде чертежа ( общий вид) , отражается его; А) структура Б)цвет В) стоимость Г) надёжность Д)плотность...
клубничка114
клубничка114
19.04.2021 18:33
1. Получить шестнадцатеричную форму внутреннего представления числа в 4 байтовой ячейке 26, 2812510 2. По шестнадцатеричной форме внутреннего представления вещественного...
valikromanenkop074w0
valikromanenkop074w0
24.07.2022 09:04
Здраствуйте, мне нужна . по информатике решаем с формулами i=k*i n=2i и все такое. , объясните принцип этих , как разбираться где что, как пользоваться формулами....
Margarita11mm
Margarita11mm
19.01.2020 15:46
Напишите программу,которая запрашивает год и выдаёт на экран количество дней в этом году (год бывает високосным или нет)...
алгебра171
алгебра171
09.10.2020 23:52
Составить программу на языке паскаль которая 1.из слов, биология , «магазин», зоопарк – составить слово зоология , зоомагазин, подсчитать сколько в них букв 2. в...
parknariya
parknariya
12.04.2020 20:58
Что тут не так? program nod; var a,b: integer; begin write ( введите два натуральных числа ); readln(4,2); while 4 2 do if 4 2 then a: =4-2 else b: =2-4 writeln(...
sarranuryeva
sarranuryeva
27.06.2021 15:11
( ПАСКАЛЬ) под какими цыфрами ???...
Nora3698
Nora3698
20.08.2020 09:56
Як називається файл , який містить стилі оформлення презентації? інформатика 6 клас ​...
vovalomov00
vovalomov00
02.05.2023 02:52
Подскажите какие фигуры не используются в блок - схемах? 1 - прямоугольник, ромб 2 - ромб, параллелограм 3 - круг, треугольник 4 - стрелки, параллелограм....
Вейпер228
Вейпер228
23.06.2020 22:03
Производилась двухканальная (стерио) звукозапись с частотой дискретизации 16кгц и 24 битным разрешением.в результате был получен фаил размером 60 мбайт,сжатие данных...
Ответ:
Nikki21
09.10.2020 03:00

begin

 var Max := ReadSeqInteger(3).Max;

 Print(Max, Max mod 3 = 0)

end.

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