Саня130905
01.09.2020 14:36

Обчисліть: у = 2х + 3х 2 + 4х 3 + … + 11х..
1.Блок-схема алгоритму:
2. Лістинг програми

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Paxxan
25.04.2021 22:19
1) перекодування даних, яке проводиться з метою зменшення їх об'єму, розміру, обсягу.
2) це процес стискування інформації (файлів, груп файлів, каталогів, цілих дисків) з метою економії дикого простору та захисту її від несанкціонованого доступу.
3) процес відновлення файлів з архіву в тому самому вигляді, який вони мали до упакування в архів
4) результат архівування
5) сучасні програмні засоби для створення та обслуговування архівів.
6) це архіви, до яких приєднано виконуваний модуль, що дозволяє витягати (розпаковувати) файли простим запуском архіву як звичайної програми (без програми-архіватора).
7)це архіви, що складаються з декількох частин (файлів), які називають томами
8)ZIP; RAR; RLE; CAB; GZIP, TAR

10)для створення і керування архівними файлами
0,0(0 оценок)
Ответ:
igorkurkin02
06.01.2023 22:32
Program srednee;
var
  a, b, c:integer;
  sa:real;
begin
write ('Введите а='); readln (a);
write ('Введите b='); readln (b);
write ('Введите c='); readln (c);
if (a mod 5 = 0) and (b mod 5 <> 0) and (c mod 5 = 0) then
  begin
          a:= sqr(a); writeln ('Квадрат а=', a);
          b:= sqr(b); writeln ('Квадрат b=', b);
          c:= sqr(c); writeln ('Квадрат c=', c);
  end else begin
      if (a mod 5 <> 0) and (b mod 5 = 0) and (c mod 5 <> 0) then
        begin
          a:= a+10; writeln ('а+10=', a);
          b:= b+10; writeln ('b+10=', b);
          c:= c+10; writeln ('c+10=', c);
        end else begin
          sa:=(a+b+c)/3;
          write ('Среднее арифметическое =', sa);
          end
      end
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота