Подсчитайте в переменной s сумму чисел 5/5 ; 10/5; 15/5 : 20/5; 25/5; и так далее до тех пор пока сумма остается меньше 13
Program Sum_chisel;
var s; real; n;lnteger;
begin ?

юля2720    2   17.05.2020 23:11    6