Оглавление:
- 1 Задача — Найти максимальное число из трех
— программирование на Pascal, Си, Кумир, Basic-256, Python- 1.1 Pascal
- 1.2 Язык Си
- 1.3 Python
- 1.4 КуМир
- 1.5 Basic-256
Задача — Найти максимальное число из трех
— программирование на Pascal, Си, Кумир, Basic-256, Python
Вводятся три целых числа. Определить какое из них наибольшее.
Пусть a, b, c — переменные, которым присваиваются введенные числа, а переменная m в конечном итоге должна будет содержать значение наибольшей переменной. Тогда алгоритм программы сведется к следующему:
- Сначала предположим, что переменная a содержит наибольшее значение. Присвоим его переменной m.
- Если текущее значение m меньше, чем у b, то следует присвоить m значение b. Если это не так, то не изменять значение m.
- Если текущее значение m меньше, чем у c, то присвоить m значение c. Иначе ничего не делать.
Данную задачу можно решить и без использования четвертой переменной, однако программа будет логически сложнее:
- Если a больше b, то проверить больше ли a, чем c. Если это так, то максимальное число содержит переменная a. Если a больше b, но при этом меньше c, то максимальным является значение c.
- Иначе (когда a меньше b) сравнить значения b и c. Большее из них и есть максимальное.
Pascal
// 1-й способ:
var
a,b,c,max: integer;
begin
readln(a,b,c);
max := a;
if max < b then max := b;
if max < c then max := c;
writeln(max);
end.
// 2-й способ:
var
a,b,c: integer;
begin
readln(a,b,c);
if a > b then
if a > c then writeln(a)
else writeln(c)
else
if b > c then writeln(b)
else writeln(c);
end.
Язык Си
// 1-й вариант:
#include <stdio.h>
main() {
int a,b,c,m;
scanf(«%d%d%d»,&a,&b,&c);
m = a;
if (m < b) m = b;
if (m < c) m = c;
printf(«%dn», m);
}
// 2-й вариант:
#include <stdio.h>
main() {
int a,b,c;
scanf(«%d%d%d»,&a,&b,&c);
if (a > b)
if (a > c) printf(«%dn», a);
else printf(«%dn», c);
else
if (b > c) printf(«%dn», b);
else printf(«%dn», c);
}
Python
# 1-й вариант:
a = int(input())
b = int(input())
c = int(input())
m = a
if m < b:
m = b
if m < c:
m = c
print(m)
# 2-й вариант:
a = int(input())
b = int(input())
c = int(input())
if a > b:
if a > c:
print(a)
else:
print(c)
else:
if b > c:
print(b)
else:
print(c)
КуМир
| 1-й вариант:
алг максимум из трех
нач
цел a, b, c, m
ввод a, b, c
m := a
если b > m то m := b все
если c > m то m := c все
вывод m
кон
| 2-й вариант:
алг максимум из трех
нач
цел a, b, c
ввод a, b, c
если a > b то
если a > c то
вывод a
иначе
вывод c
все
иначе
если b > c то
вывод b
иначе
вывод c
все
все
кон
Basic-256
# 1-й вариант:
input a
input b
input c
max = a
if max < b then max = b
if max < c then max = c
print max
# 2-й вариант:
input a
input b
input c
if a > b then
if a > c then
print a
else
print c
endif
else
if b > c then
print b
else
print c
endif
endif
Did you find apk for android? You can find new Free Android Games and apps.
Перейти к содержанию
Найти максимальное число из трех
Просмотров 44.1к. Обновлено 29 октября 2021
Пусть a, b, c – переменные, которым присваиваются введенные числа, а переменная m в конечном итоге должна будет содержать значение наибольшей переменной. Тогда алгоритм программы сведется к следующему:
- Сначала предположим, что переменная a содержит наибольшее значение. Присвоим его переменной m.
- Если текущее значение m меньше, чем у b, то следует присвоить m значение b. Если это не так, то не изменять значение m.
- Если текущее значение m меньше, чем у c, то присвоить m значение c. Иначе ничего не делать.
Данную задачу можно решить и без использования четвертой переменной, однако программа будет логически сложнее:
- Если a больше b, то проверить больше ли a, чем c. Если это так, то максимальное число содержит переменная a. Если a больше b, но при этом меньше c, то максимальным является значение c.
- Иначе (когда a меньше b) сравнить значения b и c. Большее из них и есть максимальное.
Пример кода Pascal
максимальное среди трех чисел паскаль
// 1-й способ:var
a,b,c,max: integer;
begin
readln(a,b,c);
max := a;
if max < b then max := b;
if max < c then max := c;
writeln(max);
end.// 2-й способ:
var
a,b,c: integer;
begin
readln(a,b,c);
if a > b then
if a > c then writeln(a)
else writeln(c)
else
if b > c then writeln(b)
else writeln(c);
end.
Пример кода Язык Си
// 1-й вариант:#include
main() {
int a,b,c,m;
scanf("%d%d%d",&a,&b,&c);
m = a;
if (m < b) m = b;
if (m < c) m = c;
printf("%dn", m);
}// 2-й вариант:
#include
main() {
int a,b,c;
scanf("%d%d%d",&a,&b,&c);if (a > b)
if (a > c) printf("%dn", a);
else printf("%dn", c);
else
if (b > c) printf("%dn", b);
else printf("%dn", c);
}
Пример кода Python
максимальное среди трех чисел Python
# 1-й вариант:a = int(input())
b = int(input())
c = int(input())m = a
if m < b:
m = b
if m < c:
m = cprint(m)
# 2-й вариант:
a = int(input())
b = int(input())
c = int(input())if a > b:
if a > c:
print(a)
else:
print(c)
else:
if b > c:
print(b)
else:
print(c)
Пример кода КуМир
| 1-й вариант:алг максимум из трех
нач
цел a, b, c, m
ввод a, b, c
m := a
если b > m то m := b все
если c > m то m := c все
вывод m
кон| 2-й вариант:
алг максимум из трех
нач
цел a, b, c
ввод a, b, c
если a > b то
если a > c то
вывод a
иначе
вывод c
все
иначе
если b > c то
вывод b
иначе
вывод c
все
все
кон
Пример кода Basic-256
# 1-й вариант:input a
input b
input c
max = a
if max < b then max = b
if max < c then max = c
print max# 2-й вариант:
input a
input b
input c
if a > b then
if a > c then
print a
else
print c
endif
else
if b > c then
print b
else
print c
endif
endif
Практическая работа “КУМИР. Поиск максимального элемента одномерного массива”
Оценка 4.8
Данную разработку можно использовать при проведении практической работы на уроке при изучении раздела одномерные массивы на языке программирования КУМИР. В разработке предоставлена задача на поиск максимального элемента одномерного массива, описаны этапы разработки программы. Также учащимся предлагается составить программы для решения 9 задач, а также творческое задание по составлению своей задачи по данной теме.
Материалы на данной страницы взяты из открытых истончиков либо размещены пользователем в соответствии с договором-офертой сайта. Вы можете сообщить о нарушении.
алг Большее
нач вещ a,b,c,d,e,max1,max2
ввод a,b,c,d,e
если a>b то max1:=a
иначе max1:=b
все;
если c>d то max2:=c
иначе max2:=d
все;
если max1>max2 и max1>e
то вывод “Наибольшее число “, max1;
иначе
если max2>max1 и max2>e
то вывод “Наибольшее число “, max2;
иначе вывод “Наибольшее число “, e;
все;
все;
кон
5
Ввести пять чисел и найти наибольшее из них. Рассмотрев все варианты. Кумир. Через “если-то-иначе”
Ввести пять чисел и найти наибольшее из них. Рассмотрев все варианты.
Кумир. Через “если-то-иначе”
1 ответ:
0
0
алг Большее
нач вещ a,b,c,d,e,max1,max2
ввод a,b,c,d,e
вывод a,b,c,d,e
если a>b то max1:=a
иначе max1:=b
все;
если c>d то max2:=c
иначе max2:=d
все;
если max1>max2 и max1>e
то вывод max1;
иначе
если max2>max1 и max2>e
то вывод max2;
иначе вывод e;
все;
все;
кон
Читайте также
D:SCHOOLINFO потому как <span>7_CLASS и Список_литературы.txt. добавили значит их отбрасываем </span>
Первые антивирусные программы появились еще зимой 1984 года (первый вирус для персональных компьютеров Apple появился в 1977 году, и только в 1981 году появились вирусы, представляющие какую-либо угрозу) под названиями CHK4BOMB и BOMBSQAD. Их написал американский программист Энди Хопкинс (Andy Hopkins). CHK4BOMB позволяла проанализировать текст загрузочного модуля и выявить все текстовые сообщения и «подозрительные» участки кода. Программа BOMBSQAD перехватывала операции записи и форматирования, выполняемые через BIOS. При выявлении запрещённой операции можно было разрешить или запретить её выполнение.Первый антивирус в современном понимании этого термина, то есть резидентный, «защищающий» от вирусных атак, появился в 1985 году. Программа DRPROTECT создана усилиями Джи Вонг (Gee Wong). Разработка блокировала все операции (запись, форматирование), выполняемые через BIOS. В случае выявления такой операции программа требовала рестарта системы.
Скорее всего неправильно введены расшифровки букв, взяла из браузера
получилось ГММГЮКА
<span>***
Идет урок информатики в школе. – Вася, – спрашивает учитель, – Сколько в килобайте байт? Тот молчит. – Ага, не знаешь! Почему не выучил? – Мамы дома не было, помочь было некому …-Садись, “два”. – Толя Иванов, сколько в килобайте байт? И ты не знаешь? Почему? – Папа поздно пришел… -Садись, тоже “два”. Гоша, а ты знаешь? – Не знаю. Я вчера новый вирусок клепал, хард-диски форматировал, вот и не успел выучить. – Ты что же, хочешь меня напугать? Садись! “ТРИ”!!!
***
Используются ли в вашей школе компьютеры? – спрашивает проверяющий из гороно. – Конечно,
отвечает директор. – Вот смотрите! Приоткрывают дверь в 1А класс и их глазам предстаёт такая картина. На подоконниках стоят три компьютера. Учительница Мария Ивановна обращается к ученикам: – Дети, если я переставлю один компьютер к тем двум, сколько всего там станет компьютеров?</span>
Program xxx;
uses crt;
var price, calc:real
begin
writeln(‘Ведите сумму’);
readln(price);
if price<500 then
begin
calc:=price-price*0.03;
writeln(‘с учетом скидки сумма будет’,calc*)
end;
if price>1000 then
begin
calc:=price-price*0.05;
writeln(‘с учетом скидки сумма будет’,calc*)
end;
end.