Заполните пропуски в таблице единицами изме- рения информации: 1 Эбайт 1024 Пбайт 1024 байт 1... 210 - id2013985420200504 от ilmasha24 04.05.2020 22:38

Question

Информатика: Заполните пропуски в таблице единицами изме- рения информации: 1 Эбайт 1024 Пбайт 1024 байт 1... 210 байт 280 байт 1 Мбайт 1 Мбайт 1 Tбайт 1024 Кбайт ... 1024 ... 240 байт байт бит 1 Гбайт ІІ 1024 Мбайт 1024 Tбайт 1... 250 байт 270 байт 1 Збайт 1024 Эбайт

ilmasha24 · Accepted Answer

Не особо знаю паскаль, так что дабы не накосячить с синтаксисом, покажу на примере. Тут всё просто - тебе лишь нужен цикл For и расчет процентов.

FOR i = 1 TO 100
percents = FIX(x * p / 100) ' здесь у нас есть переменная percents, которой присваиваются округленные функцией fix проценты (насколько я знаю, в паскале аналогичная функция называется Round)
x = x + percents 'тут всё понятно - переменной X присваивается она сама и годовые проценты по вкладу
IF x >= y THEN 'проверяем, не равен или не превысил ли наш вклад ожидаемую сумму
PRINT i 'в цикле For можно не заморачиваться с отслеживанием лет, переменная i сама подсчитает количество итераций-лет
END 'завершаем программу
END IF
NEXT i ' конец цикла
Можно ещё чисто для себя добавить в условие вывод переменной X, чтобы было нагляднее.

MOGZ ответил