Есть ответ 👍

Процедура целочисленного деления двух целых чисел (входные параметры: a,b- числа; выходной параметр- целое частное a/b). функция целочисленного деления двух целых чисел (выходные параметры: a,b- числа; возвращаемое значение - целое частное a/b). написать программу в pascalabc.net.

246
350
Посмотреть ответы 2

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


Процедура: procedure dp(a,b: integer); begin writeln(a div b); end; функция: function df(a,b: integer): integer; begin df: =a div b; end; программа с процедурой: program n1; var x,y: integer; procedure dp(a,b: integer); begin writeln(a div b); end; begin readln(x,y); dp(x,y); end. программа с функцией: program n1; var x,y: integer; function df(a,b: integer): integer; begin df: =a div b; end; begin readln(x,y); writeln(df(x,y)); end.

Program area; var a: integer; // сторона а b: integer; // сторона b s: integer; // площадь прямоугольника p: integer; // периметр прямоугольника  begin write("введите а: "); // выводим сообщение  readln(a);   // получаем значение а write("введите b: ");   // выводим сообщение  readln(b);   // получаем значение   b s: =a*b; // вычисляем площадь p: =a*2+b*2;   // вычисляем периметр write("площадь равна: ", s);   // выводим сообщение  write("периметр равен: ", p);   // выводим сообщение  end.

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