Синформатикой! составьте программы на паскале: 1)вывести - вопрос №99707201 от VicusiaKoval 09.05.2022 23:26

Question

Информатика: Синформатикой! составьте программы на паскале: 1)вывести на экран первые десять членов последовательности,заданой формулой х(индекс n)=n^2-10.например при n=5 должны выйти числа -9,-6,-1,6,15.2)вычислить среднее арифметическое целых чисел из диапазона от 6 до 50,кратных 3.можно написать как для 8 класса, ​

VicusiaKoval · Answer

// 1)begin  var n := 1;  var k := 10;  while n = k do  begin    Print(n * n - 10);    n += 1  end; end.// 2)begin  var n := 0;  var Sum := 0;  for var i:= 6 to 50 do    if i mod 3 = 0 then    begin      n += 1;      Sum += i    end;  Print(Sum/n) end....