В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
dralov574
dralov574
09.05.2022 02:38 •  Информатика

Найти сумму чисел из промежутка от а до b с шагом х ( х может быть как целым, так и дробным числом)

Показать ответ
Ответ:
арсений213
арсений213
02.07.2020 02:10
Если фразу "Практическая работа номер 1" нужно было перевести в двоичный код, то вот: 1101000010011111110100011000000011010000101100001101000010111010110100011000001011010000101110001101000110000111110100001011010111010001100000011101000010111010110100001011000011010001100011110010000011010001100000001101000010110000110100001011000111010000101111101101000110000010110100001011000000100000110100001011110111010000101111101101000010111100110100001011010111010001100000000010000000110001
Количество цифр: 400
0,0(0 оценок)
Ответ:
zhenyakulakova
zhenyakulakova
26.04.2020 18:29
Program z3;  Var y: array [1..15] of real;      g: array [1..20] of real;      i,d: integer; sum, sum_2: real;Begin  writeln('Введите оплату труда за день'); read(d);  for i := 1 to 15 do    y[i] := random (30) * d * 0.8;      for i:=1 to 20 do    g[i] := random (30) * d * 0.8;    for i:=1 to 15 do  begin    writeln('Сотрудник y_',i,' - ',y[i]);    sum:= sum + y[i];  end;  writeln;  writeln('Сумма отдела y - ', sum);  writeln;  for i:=1 to 20 do  begin    writeln('Сотрудник g_',i,' - ',g[i]);    sum_2:= sum_2 + g[i];  end;  writeln;  writeln('Сумма отдела g - ', sum_2);  writeln;    End.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота