Задание 2 Вариант 1 Самостоятельная работа 5 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)
Решение #1
Рассмотрим вариант решения задания из учебника Босова, Босова, Аквилянов 11 класс, Бином:
2. Каждый вторник члены Клуба Толстяков выстраиваются в определённом порядке и взвешиваются. Напишите программу, которая бы хранила взвешивания всех 8 членов клуба за прошлую неделю. При вводе новых данных компьютер должен печатать «Поздравляю!», если члену клуба удалось похудеть, либо величину прибавки веса.
Запишите исходные данные и полученные результаты:
Вес на прошлой неделе
Результат взвешивания
Комментарий
Вес на прошлой неделе
Результат взвешивания
Комментарий
program s5_v1_2;
const
n = 8;
var
a: array[1..n] of real;
c: real;
i: integer;
begin
writeln(' ');
for i := 1 to n do
begin
write(i, '=');
readln(a[i])
end;
writeln(' ');
for i := 1 to n do
begin
write(i, '=');
readln(c);
if a[i] >c then writeln('Поздравляю!')
else writeln('Прибавка ', c - a[i]:2:1)
end.
*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением
