Дайте ответ ** данные вопросы (язык поскаль) 1.Объявить три переменные целого типа;...

0 голосов
55 просмотров

Дайте ответ на данные вопросы (язык поскаль) 1.Объявить три переменные целого типа; ввести их значения с клавиатуры (используя стандартную процедуру readln); вывести на экран сумму значений этих переменных и среднее арифметическое значение по этим трем переменным (используя стандартную процедуру writeln). 2.Та же задача, но для значения суммы использовать отдельную переменную целого типа (её тоже нужно объявить), а для значения среднего арифметического — отдельную переменную нецелого («с плавающей запятой») типа (её тоже нужно объявить). Итого в программе будет объявлено пять переменных. Сперва найти сумму введенных значений трех переменных, поместив её в отдельную переменную, затем вывести её на экран. Аналогично поступить для значения среднего арифметического. 3.Объявить переменную строкового типа (тип String); ввести с клавиатуры её значение (с помощью readln); вывести на экран значение этой переменной (с помощью writeln). Затем изменить значение этой переменной (например с помощью оператора присваивания присвоить ей новое значение) и снова «вывести эту переменную» на экран


Информатика (12 баллов) | 55 просмотров
Дан 1 ответ
0 голосов

1.

var a,b,c:integer;

begin

 readln(a,b,c);

 writeln(a+b+c);

 writeln((a+b+c)/3);

end.

2.

var a,b,c,sum:integer;

   average:real;

begin

 readln(a,b,c);

 sum := a+b+c;

 writeln(sum);

 average := sum/3;

 writeln(average);

end.

3.

var str:string;

begin

 readln(str);

 writeln(str);

 str := 'Hello world!';

 writeln(str);

end.

(287 баллов)