Задание 3 Вариант 2 Самостоятельная работа 5 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)
Решение #1
Рассмотрим вариант решения задания из учебника Босова, Босова, Аквилянов 11 класс, Бином:
3. Напишите программу. Информация о количестве осадков, выпадавших в течение месяца, и о температуре воздуха задана в виде массивов. Определите, какое количество осадков выпало в виде дождя, какое — в виде снега. (Считайте, что идёт дождь, если температура воздуха больше О °C.)
Запишите текст программы.
program s5_v2_3;
const
n = 20;
var
a, b: array[1..n] of integer;
i, sd, sc: integer;
begin
writeln('Ввод массивов');
for i := 1 to n do
begin
a[i] := random(20);//массив осадков
b[i] := random(20) - 10//массив температур
end;
//вывод исходных массивов
for i := 1 to n do
write(a[i], ' ');
writeln;
for i := 1 to n do
write(b[i], ' ');
sd := 0; sc := 0;
for i := 1 to n do
if b[i] > 0 then sd := sd + a[i]
else sc := sc + a[i];
writeln;
writeln('количество в виде дождя =', sd, ' количество в виде снега=', sc);
end.
Похожие решебники
Популярные решебники 11 класс Все решебники
*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением