tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Решите : даны 3 числа.найти
Решите : даны 3 числа.найти найменьшее из них.
aya121
1 20.06.2019 02:00
0
Ответы
SuperMan87
16.07.2020 06:49
var
a, b, c, min: Integer;
begin
readln(a, b, c);
min:=a;
if b < min then min:=b;
if c < min then min:=c;
writeln(min);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Саша1111111211111
20.08.2019 17:10
Линейный алгоритм приготовления блюда...
насвай4
20.08.2019 17:10
Составьте предложения по схемам на тему наши школьные дела только можно не из интернета? ). )....
7Оля8
20.08.2019 17:30
Нужно, чтобы включение света в комнате осуществлялось с трех различных переключателей так, чтобы нажатие на любой из них приводило к включению света, если он перед этим был...
dvydenko
20.08.2019 17:30
Треугольник abc - равносторонний. длина его стороны - a см. треугольник def - вписанный равносторонний. найти разность площадей. (контрольный пример: a=9; результат = 26.305...
sashaaaa5
20.08.2019 17:30
Пользователь работал с файлом c: \ сначала он поднялся на один уровень вверх, затем поднялся ещё на один уровень вверх, создал каталог docs и переместил туда файл sun.bmp....
viktoriyabolgova
20.08.2019 17:30
Постройте таблицу истинности для логической формулы ¬ x & y v x & z...
elemesayan
20.08.2019 17:40
Зачем присваивать иксу ноль? в данном алгоритме program kitaiskiyaz; var k,x,y: real; begin x: =0; while x=0 do begin writeln( введите k,x ); read (k,x); end; y: =k/x; writeln(...
dodess
20.08.2019 17:40
Определить объем и площадь боковой поверхности параллелепипеда для данных вводимых с клавиатуры a, b и h. написать программу в паскале...
mrfenics
20.08.2019 17:40
что такое орфографический контроль? где в компьютере хранится орфографический словарь?...
Сонька2808
20.08.2019 17:40
Program shifr; var s1,s2: string; i,n,k,p: integer; key: integer; //ключ шифрования f1,f2: text; begin assign(f1, dannie.txt ); assign(f2, shifr.txt ); reset(f1); rewrite(f2);...
Популярные вопросы
Вставь пропущеный делитель 44:___=8+3 36:_=50-32 92:___=71-48 24:=8+4 75:__...
1
это сор Задание 4.Составьте короткий рассказ по рисунку (8 – 10 предложений),...
2
Венн диаграмасы арқылы суретші бейнесі мен аңыздағы құстың бейнесін салайық...
2
ответить на вопросы по рассказу Джеймса Олдриджи Последний дюйм 1. Кто такой...
3
прямоугольник разрезали на два меньших прямоугольника.Оказалось, что 1 части...
2
. Fill in the verb to be (am, is or are):1. Ifrom Russia.2. He5 years old3....
3
Спиши, расставляя знаки препинания при ОЧП и обобщающих словах. Составь...
1
Вершини трикутника ABC лежать на колі із центром у точці О. АС - діаметр...
3
Помагите даю лучший ответ! ...
3
Какие животное водятся Астравлийй...
2
a, b, c, min: Integer;
begin
readln(a, b, c);
min:=a;
if b < min then min:=b;
if c < min then min:=c;
writeln(min);
end.