Чтение, скрытый, архивный,системный, музыкальный, с паролем
var sum, i, s: integer; //обыявляем необходимые переменные
//sum - сумма, i - кол-во слогаемых, s - само слогаемое
begin //начало
sum := 0; i := 1; s := 5; //первое слогаемое = 5
while (sum < 324) do //пока сумма меньше 324
begin
sum := sum + s; //к сумме прибавляем слагаемое
s := s + 4; //увеличиваем слогаемое
i := i + 1; //увеличиваем кол-во слогаемых
end;
writeln ('Слогаемых: '); // выводим кол-во слогаемых
write (i);
end. //конец
В файле код программы.
Блин, пишите понятно, а то разность, произведение... я в украинской школе учился и хз что это.
1.принять какое либо сведение2.Кто то или что то имеющий сведения 3.не имеет сведения 4.Сведение которое дано чтобы обдумать его, понять смысл