Регистрация
kotik259
10.10.2021 16:37
Информатика
Есть ответ 👍

Определите истинность записи следующих переменных и обоснуйте: а) Float c= 14.2 b) Str c=S c) Int iv = 10, 24 d) Bool k=True​.

271
462
Посмотреть ответы 1

Ответы на вопрос:

Пупырка521
Пупырка521
4,4(60 оценок)

Код ниже

Объяснение:

program sumSquared;

var i, n, S: integer;

begin

   writeln('Введите число n: ');

   readln(n);

   S := 0;

   i := 1;

   while i <= n do begin

       S := S + i*i;

       i := i + 1;

       end;

    writeln('Сумма квадратов чисел S = ', S);    

end.

Популярно: Информатика