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