Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
3 апреля 2023 06:44
767
Паскаль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
·
Хороший ответ
5 апреля 2023 06:44
Остались вопросы?
Еще вопросы по категории Информатика
Файл размером 15 Кбайт передаётся через некоторое соединение 21 секунду. Сколько секунд будет передаваться через это же соединение файл размером 5120...
Помогите найти ошибку в коде var a,b,c,d,f,k,h:integer; begin wtiteln('В каком веке было введено право городов избирать органы власти?'); wtiteln('...
Зная,что в кодировке ASCII десятичный код каждой строчной латинской буквы на 32больше кода соответствующий прописной буквы ,декотируйте следующие сооб...
Вы можете использовать алфавит из двух символов: 0 и 1. Сколько разных трёхсимвольных слов существует в этом алфавите? Для ответа на вопрос постройте...
Написать функции добавления подстроки и удаления подстроки в любом указанном месте заданной строки.язык программирования C++...