Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
2 апреля 2023 09:15
1084
Паскаль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
Остались вопросы?
Еще вопросы по категории Информатика
3. Каковы особенности компьютеров І поколения? Верных ответов 2 Для компьютеров этого поколения характерно использование первых языков программиров...
Как египтяне перешли от изображения значком целого слова к изображению значком отдельного звука? РЕШИТе ПЛИZZZ!...
Var S : Array[1..100] Of String; 1.Какое из обращений к J-му символу I-той строки (I-го элемента массива S) будет правильным? 1)S[I][J]; 2) S[...
Согласно этому протоколу передаваемое сообщение разбивается на пакеты направляющем сервере устанавливается в исходном виде на принимающем сервере 1)ТС...
Помогите пожалуйста перевести!!! 1) 1,4 Мбайт = ... бит, 2) 1 Кбайт+1,5 Кбайт=...байт, 3) 0,49 Мбайт=...байт, 4) 20000 байт=...Кбайт, 5) 1,54 ГБайт=.....