ВЫПОЛНИМ ВМЕСТЕ ескую
нителье
е, позво
верка 2
і запис
Рассмотрим простой пример: деление двух чисел.
Выделите произвольную ячейку, например А1. В строке формул вве-
дите знак «=», затем введите выражение 100/5. Нажмите Enter. В ячей-
ке появится результат 20 (рис. 3.21). А в строке формул отобразится сама
ию, то
формула =100/5.
я
begin
writeln('Введите количество учеников в классе');
read(n);
growth_girls := 0;
growth_boys := 0;
count_boys := 0;
count_girls := 0;
for i := 1 to n do
begin
read(growth);
if (growth < 0) then
begin
growth_boys := growth_boys - growth;
count_boys := count_boys + 1;
end
else
begin
growth_girls := growth_girls + growth;
count_girls := count_girls + 1;
end;
end;
if (count_boys = 0) then
writeln('В классе нет мальчиков')
else
writeln('Средний рост мальчиков: ', (growth_boys / count_boys):0:2);
if (count_girls = 0) then
writeln('В классе нет девочек')
else
writeln('Средний рост девочек: ', (growth_girls / count_girls):0:2);
end.