Регистрация
MrEvgeniy1
15.07.2020 22:53
Информатика
Есть ответ 👍

Напишите программу [на pascal], которая вычисляет минимальное из трёх введённых чисел. используйте функцию.

155
418
Посмотреть ответы 3

Ответы на вопрос:

Roost11
Roost11
4,6(17 оценок)
// pascalabc.net 3.3, сборка 1611 от 06.01.2018 // внимание! если программа не работает, обновите версию! function min3(a,b,c: real): =min(a,min(b,c)); begin   var (x,y,z): =readreal3('введите три числа: ');   writeln('минимальное: ',min3(x,y,z)) end. пример введите три числа: 3.18 -2 5.7 минимальное: -2
lolo555
lolo555
4,7(38 оценок)
Function min(x,y: integer): integer; beginif x< y then min: =x else min: =y; end; var a,b,c: integer; beginreadln(a,b,c); writeln('min = ',min(min(a,b),c)); end.пример: 8 2 5min = 2
sPHAgNUM1
sPHAgNUM1
4,6(87 оценок)

1 int main() {

2 int x = 1, m = 1;

3 int n;

4 cout << "vvedite kolichestvo: ";

5 cin >> n;

6 for (int i = 0; i < n; i++) {

7 x *= m;

8 cout << x << endl;

9 cout << "vvedite novoe chislo: ";

10 cin >> m;

11 }

ЕСЛИ ПОНРАВИЛСЯ ОТВЕТ СДЕЛАЙ ЕГО ЛУЧШИМ)

Популярно: Информатика