Регистрация
TittansMass
05.12.2020 15:59
Информатика
Есть ответ 👍

Напишите программу в паскаль для решения следующей : для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. если первое из них отрицательно, а второе вдвое больше третьего, то выведите среднее арифметическое всех четырех чисел. если произведение этих четырех чисел больше их суммы, то выведите эти сумму и произведение. если выполняются одновременно два перечисленных выше условия, то выведите среднее арифметическое этих чисел, их произведение и сумму. иначе, выведите удвоенные значения этих чисел.

146
262
Посмотреть ответы 2

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

KARYCY798
KARYCY798
4,8(95 оценок)
Var a,b,c,d: real; begin readln(a,b,c,d); i f (a< 0) and (b/c=2) then begin writeln((a+b+c+d)/4); if a*b*c*b> a+b+c+d then  begin writeln(a*b*c*b); writeln(a+b+c+d); end; end else writeln(a*2,' ',b*2,' ',c*2,' ',d*2); end.
loveinyourhard
loveinyourhard
4,5(97 оценок)

import random

a = input("Введите число A: ")

b = input("Введите число B")

massiv = []

if int(a) > int(b):

   for generating in range(1,11):

       massiv += str( random.randint(int(b), int(a)) )

   # Не обязательный дебаг массива

   print(massiv)

else:

   print("Введите число больше чем B!")

Объяснение:

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