1. Информатика
  2. Решите : даны 3 числа.найти

Решите : даны 3 числа.найти найменьшее из них.

aya121 aya121    1   20.06.2019 02:00    0

Ответы
SuperMan87 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 Саша1111111211111  20.08.2019 17:10
Линейный алгоритм приготовления блюда...
насвай4 насвай4  20.08.2019 17:10
Составьте предложения по схемам на тему наши школьные дела только можно не из интернета? ). )....
7Оля8 7Оля8  20.08.2019 17:30
Нужно, чтобы включение света в комнате осуществлялось с трех различных переключателей так, чтобы нажатие на любой из них приводило к включению света, если он перед этим был...
dvydenko dvydenko  20.08.2019 17:30
Треугольник abc - равносторонний. длина его стороны - a см. треугольник def - вписанный равносторонний. найти разность площадей. (контрольный пример: a=9; результат = 26.305...
sashaaaa5 sashaaaa5  20.08.2019 17:30
Пользователь работал с файлом c: \ сначала он поднялся на один уровень вверх, затем поднялся ещё на один уровень вверх, создал каталог docs и переместил туда файл sun.bmp....
viktoriyabolgova viktoriyabolgova  20.08.2019 17:30
Постройте таблицу истинности для логической формулы ¬ x & y v x & z...
elemesayan 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 dodess  20.08.2019 17:40
Определить объем и площадь боковой поверхности параллелепипеда для данных вводимых с клавиатуры a, b и h. написать программу в паскале...
mrfenics mrfenics  20.08.2019 17:40
что такое орфографический контроль? где в компьютере хранится орфографический словарь?...
Сонька2808 Сонька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);...

Популярные вопросы