даны значения a и b найти z=x²+y, если x=a+b y=7x+ab составить программу паскаль!??
5-9 класс
|
помогите пожалуйста!
Program zadacha;
Var a,b,x,y:Integer;
z:Real;
Begin
WriteLn('Введите a ');
Read(a);
WriteLn('Введите b ');
Read(b);
x:=a+b;
y:=7*x+a*b;
z:=x*x+y;
WriteLn('Результат: ',z);
ReadLn;
End.
Другие вопросы из категории
глагол прилогательное существительное
получен файл размером 60 Мбайт, сжатие данных не производилось. Какая из приведённых ниже величин наиболее близка к времени, в течение которого проводилась запись?
1) 2 мин
2) 5 мин
3) 10 мин
4) 15 мин
2)Даны натуральные числа от 1 до 150. Найти сумму тех из них, которые делятся на 5 или на 7.
3)Напечатать те из чисел от 10 до 50, которые делятся на 4, но не делятся на 6
4)Найти произведение нечетных чисел от 10 до 50, кратных 13
кто может сделать в Паскале или просто решить?
Читайте также
знаки и затем найти сумму Помогите алгоритм составить в Паскале .
равносторонний,равнобедренный или какой либо другой.
Вот ещё одна
Составить программу:Даны а,b,c-целые числа.Если они большн 0-вычислите сумму их квадратов;а если хотя бы одно из них четно-вычислите их сумму и произведение.
Пожалуйста ребят.
Составить программу, определяющую, является ли данное утверждение истинным:Ровно одно из чисел А и В не превышает 100
2.Дано 2х значное число составить программу с помощью которой можно отпределить входит ли в это число цифра шесть.
и количество элементов с нечетными значениями.
б) Составьте программу, которая заполняет массив b[1..8] случайными целыми числами в диапазоне от 1 до 10 и находит произведение элементов с нечетными значениями и количество элементов с четными значениями.