tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Программирование на паскале.
Программирование на паскале. тема ветвление. составить программу, определяющую минимальное число из двух чисел, введенных с клавиатуры и увеличивающую найденное число вдвое.
peterDIYanov
3 24.06.2019 16:10
0
Ответы
Виолетик5
20.07.2020 06:33
Program prog1;
var
z,x,y:integer;
begin
write('Введите два числа:");
read(x,y);
if x>y then
z:=x*2;
else
z:=y*2;
write(z);
readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
ivangregori32p08irj
20.07.2020 06:33
If a<b then a:=a*2 else b:=b*2
a,b - числа
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
daniellarussel1
11.05.2019 14:45
Как сделать что бы переходя по ссылке вас перекидывало в нужный браузер...
arsyuha
15.09.2019 23:10
Решить в турбо паскале z1=sina^4*a-1+2sin^*2a+cos^*2a z2=-cos^4*a...
nurbo55555555551
15.09.2019 23:10
Надеюсь на ! напишите программу которая задает массив из 15 элементов случайным образом на интервале от -40 до 90, программным обеспечением является число простым или...
катяkfrr
15.09.2019 23:10
Составить блок схему и написать программу которая находит сумму цифр четного четырехзначного числа либо произведение нечетного четырехзначного числа...
LAxPiet
15.09.2019 23:10
1.что такое табличный отчёт? 2.какие виды сортировки данного существуют? 3. какие виды компьютерный графики существуют? 4. что означает «язык запроса»? 5.какие преимущества...
Вsеzнaйkа
15.09.2019 23:10
Наука о методах сбора,хранения,преобразования,отправки,получения и использования информации....
shevchenkok1
15.09.2019 21:44
Укажи, к какому информационному действию относится объединение предметов в группу по общему признаку.обработкапредставлениехранение сборпередача...
EugeneEugene007
15.09.2019 23:10
Даны два числа. если эти числа неотрицательные, то найдите их сумму, иначе модуль разности...
kukusiki12345
15.09.2019 23:10
сколько бит информации несёт сообщение о том, что из колоды в 32 карты достали « пик»? дано: n = 32, i - ? 2)какое количество информации в сообщении из 10 символов,...
marinamarinam9
15.09.2019 23:10
Для хранения текста в восьмибитовой кодировке требуется 11 кбайт.сколько страниц займет этот текст,если на странице размещается 30 строк по 80 символов в строке...
Популярные вопросы
Прямая, которая пересекает противоположные стороны параллелограмма,...
1
12. в узлах металлической кристаллической решетки находятся: а) атомы...
1
Выразите: 1) в квадратных сантиметрах: 8 дм в кв; 16 дм в кв; 4 м...
2
2.раскройте скобки, употребляя глагол в present perfect. 1. he (write)...
1
1. соотнесите: название вещества: тип связи: 1) хлороводород 2) медь...
3
3.раскройте скобки, употребляя формы present perfect или past indefinite....
3
6.какое количество тромбоцитов содержится в 1 мм3 крови человека...
3
Восемь пятнадцатых плюс три десятых и все умножить на девять....
2
4.поставьте глагол в past perfect или past indefinite. 1. yesterday...
3
Объясните, для чего необходим научный прогноз при поиске и добыче...
1
var
z,x,y:integer;
begin
write('Введите два числа:");
read(x,y);
if x>y then
z:=x*2;
else
z:=y*2;
write(z);
readln;
end.
a,b - числа