Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
3 апреля 2023 06:44
733
Паскаль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
Остались вопросы?
Еще вопросы по категории Информатика
Одна минута записи стереоаудиофайла занимает на диске 3,7 мб.Частота дискретизации 32 кГц.Какова разрядность звуковой платы?...
Выберите форматы текстовых файлов: ODT GIF TXT JPEG DOC PDF RTF HTML EXE BMP...
Робот-попугай Лёшенька хочет поразить своего создателя Бориса Ивановича тем, как хорошо он помнит «Трёх мушкетёров» (это любимый фильм Бориса Иванович...
паскаль прошу очень важно)Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, кратное 4. Программа получ...
Чему будет равна переменная b после выполнения этой программы: a := 1;
b := 5;
a := a - b;
b := 2*b - a;...