Інформатика 8 клас (pascal abc) 6. Створіть проект - вопрос №8614583531 от ksdkjxddjcksmsfmkf 27.04.2020 14:58

Question

Информатика: Інформатика 8 клас (pascal abc) 6. Створіть проект для обчислення суми n чисел, перше з яких дорівнює x, а кожне наступне на 5 більше від попереднього.​

ksdkjxddjcksmsfmkf · Answer

var  n, x, i, sum: integer; begin  readln(n);  readln(x);  sum := 0;  for i:=1 to n do  begin  sum := sum + x;  x := x + 5;  end;  writeln(sum);end....

Інформатика 8 клас (pascal abc) 6. Створіть проект для обчислення суми n чисел, перше з яких дорівнює x, а кожне наступне на 5 більше від попереднього.​

Інформатика 8 клас (pascal abc) 6. Створіть проект для обчислення суми n чисел, перше з яких дорівнює x, а кожне наступне на 5 більше від попереднього.