Подсчитайте в переменной s сумму чисел 4/5; 12/5; 20/5; 28/5; 36/5 и так далее до тех пор, пока сумма не превысит 19.Написать блок схему и программу на паскаль используя цикл ДО


Подсчитайте в переменной s сумму чисел 4/5; 12/5; 20/5; 28/5; 36/5 и так далее до тех пор, пока сумм

Nozzer4K Nozzer4K    1   21.05.2020 19:07    4

Ответы
kseniazaica kseniazaica  15.10.2020 05:01
program Sum_chisel;var s: real; n: integer;begins := 0;n := 4;repeats := s + n/5;n := n + 8;until s > 19;writeln('сумма=', s)end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика