Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
2 апреля 2023 09:15
880
Паскаль1. Составить программу для нахождения наименьшего числа из трех.
2. Написать программу на языке программирования Паскаль, которая будет соответствовать следующей блок-схеме:

1
ответ
1 задание
begin
var m,a,b,c:integer;
println('Ввести 3 значения через пробел');
read(a,b,c);
m:=min(a,b);
m:=min(m,c);
print(m);
end.
2 задание
begin
var d,a, b, c: integer;
println('Ввести 3 значения через пробел');
read(a, b, c);
if(a < c) then
d := a;
if(b<c) then
a:=d;
d:=d+a;
print(d);
end.
begin
var m,a,b,c:integer;
println('Ввести 3 значения через пробел');
read(a,b,c);
m:=min(a,b);
m:=min(m,c);
print(m);
end.
2 задание
begin
var d,a, b, c: integer;
println('Ввести 3 значения через пробел');
read(a, b, c);
if(a < c) then
d := a;
if(b<c) then
a:=d;
d:=d+a;
print(d);
end.
0
·
Хороший ответ
4 апреля 2023 09:15
Остались вопросы?
Еще вопросы по категории Информатика
Информацию об одном объекте в рбд содержит: а) имя б) запись в) поле г) сноска...
Вы можете использовать алфавит из двух символов: 0 и 1. Сколько разных трёхсимвольных слов существует в этом алфавите? Для ответа на вопрос постройте...
CD объемом 700 Мб весит 15г. Сколько будет весить набор таких дисков, необходимый для полного копирования информации с жесткого диска объемом 320 Гб?...
Самостоятельная работа 1 по теме «Основы логики» 3aranne 1. Bbruerus: a) 0v1)♥(yo) b)(1~1)<0)vi C) (1→1) -(0 → 0) d) 0~1)〜1 e) 1x0x1)>1...
Составить блок-схему к заданию: Ввести действительные числа а1,а2 , ... ,а10. В последовательности а1 , a2 , ... , а10 все элементы , следующие за эле...