Синформатикой! язык программирования: паскаль.
1. найдите максимальную температуру первой декады ноября.
2. найдите среднюю зарплату 20-ти сотрудников офиса.
заранее !
Anastasia14418
1
17.12.2019 23:21
0
Другие вопросы по теме Информатика
alinatrocenko
14.02.2022 13:14
Котики2017
14.02.2022 13:24
Ласточка005
14.02.2022 13:25
валерия821
05.10.2019 07:50
Mauntians
05.10.2019 07:50
koool3
05.10.2019 07:50
Училка2281337
05.10.2019 07:50
arun3
05.10.2019 07:40
Популярные вопросы
- 5(x-3)=-2(x-4)+6заранее за ответ....
2 - Основные мероприятия по гражданское обороне, осуществляемые с целью эвакуации...
2 - Решите уравнение:а) (x-8)*2/5=2 б) 2 1/3x-2 1/3=2 1/3...
1 - Какой самый восточный город Крыма...
3 - Семён рассматривал под микроскопом срез древесного стебля и сделал микрофотографию...
1 - Определи длину данных векторов, если известны их координаты. a→{4;−3}, ∣∣a→∣∣= ;...
1 - Яка довжина світлової хвилі в повітрі, якщо її довжина у воді 435 нм?...
2 - Посчитай произведенияx^2*4x+xy*x^2...
3 - Найдите первообразную для функции 12x^5 - 45...
2 - 1 у чому полягає прогресивне значення повісті Маруся для української...
1
Объяснение:
Program z_1;
var x,i,max:integer;
begin
max:=-10;
for i:=1 to 10 do
begin
read(x);
if x>max then max:=x;
end;
writeln(max);
end.
Program z_2;
var i:integer;
x,s:real;
begin
for i:=1 to 20 do
begin
read (x);
s:=s+x;
end;
s:=s/20;
writeln (s);
end.