Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Рейтинг: Рейтинг темы: голосов - 11, средняя оценка - 4.91
Roman10
0 / 0 / 0
Регистрация: 28.09.2010
Сообщений: 17
#1

Даны три числа.Найти наименьшее из них - Turbo Pascal

28.09.2010, 16:12. Просмотров 1636. Ответов 2
Метки нет (Все метки)

Даны три числа.Найти наименьшее из них.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
28.09.2010, 16:12
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Даны три числа.Найти наименьшее из них (Turbo Pascal):

Даны три различных действительных числа. Найти два числа, модуль разности которых имеет наибольшее/наименьшее значение - Turbo Pascal
Я сижу на экзамене по Информатике и запутался. Данно задание Даны три различных действительных числа. Найти среди них два числа,...

Даны три целых числа, найти среднее из них - Turbo Pascal
Даны три целых числа, найти среднее из них. Средним назовём число, которое больше наименьшего из данных чисел, но меньше наибольшего.

Даны три числа, если одно из них равно нулю - Turbo Pascal
Даны три числа: a, b, c. Если хотя бы одно из них равно нулю с погрешностью 0,0001, то вычислить сумму этих чисел, иначе - их произведение.

Даны три действительных числа, выбрать из них то которые принадлежат интервалу - Turbo Pascal
Даны три действительных числа, выбрать из них то которые принадлежат интервалу от 1 до 3. Программа: Program Pawel; Var ...

Даны три целых числа. Вывести на экран те из них, которые Являются четными - Turbo Pascal
Вот опять засела на задачка ,задали 13 задачек решить ....7 задач сама решила ,а вот эти не могу ,запуталась ...кто сможет решите...

Даны три числа a, b, c. Если хотя бы одно из них равно нулю с погрешностью - Turbo Pascal
Даны три числа a, b, c. Если хотя бы одно из них равно нулю с погрешностью e=0,01 , то вычислить сумму этих чисел, в противном случае –...

2
Uksus
13 / 13 / 4
Регистрация: 27.09.2010
Сообщений: 53
28.09.2010, 16:21 #2
Pascal
1
2
3
4
5
6
7
8
9
10
11
uses crt;
var x,y,z:integer;
begin
clrscr;
writeln('Vvedite cisla');
readln(x,y,z);
if (x<y)and(x<z)then writeln ('Naimenshee chislo x');
if (x>y)and(y<z)then writeln ('Naimenshee chislo y');
if (x>z)and(y>z)then writeln ('Naimenshee chislo z');
readln;
end.
Такую программу?
1
Roman10
0 / 0 / 0
Регистрация: 28.09.2010
Сообщений: 17
28.09.2010, 16:25  [ТС] #3
Да,спасибо))
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
28.09.2010, 16:25
Привет! Вот еще темы с ответами:

Даны три действительных числа. Возвести в кубте из них, значения которых отрицательны - Turbo Pascal
Даны три действительных числа. Возвести в кубте из них, значения которых отрицательны.

Даны три вещественных числа. Возвести в квадрат те из них, значения которых отрицательны - Turbo Pascal
3. Даны три вещественных числа. Возвести в квадрат те из них, значения которых отрицательны.

Даны три вещественных числа. Вывести на экран те из них которые принадлежат интервалу ( -∞,0) - Turbo Pascal
Даны три вещественных числа. Вывести на экран те из них которые принадлежат интервалу ( -∞,0) Надо написать на трубо паскале......

Даны три действительных числа.Разработать программу, которая возведет те из них, значения которых неотрицательны. - Turbo Pascal
Program Alex1; uses crt; var a,b,c:real; Begin TextBackGround(0); clrscr; textcolor(4); gotoxy(34,6); writeln...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.