Даны четыре целых числа. Нсйти сумму тех, которые больше пяти.

1. Даны два целых числа A и B (A < B). Найти сумму всех чисел от A до B включительно. 2. Даны два целых числа A и B (A 0). Найти произведение всех чисел от A до B включительно. 3. Дан массив целых чисел Х. Найти сумму квадратов всех чисел. 4.

1) Даны два целых числа A и B (A < B). Найти сумму квадратов всех целых чисел от A до B включительно. 2) Даны натуральные числа от A до B (A

Что у меня не верно? Даны четыре вещественных числа. Найти сумму тех из них, которые больше десяти. var a, b, c, d, S:real; begin writeln ('введи числа') ; readln (a, b, c, d) ; S:=0; if (a>10) then S:=S+a; if (b>10) then S:=S+b;

1. Даны целые числа b1, b2, ..., b10. Выяснить: а) верно ли, что сумма тех из них, которые больше 20, превышает 100; б) верно ли, что сумма тех из них, которые меньше 50, есть четное число.

Дано четыре вещественных числа найти сумму тех чисел которые больше пяти на Паскаль