Какой язык программирования?PASCAL ABC? C++? JAVA?
1) Недостающие фрагменты:
var a, b, p
Readln(a);
Readln(b);
2) Блок-схема:
(начало)
|
/ a, b /
|
[ y = 3*a^3 - 2*b^2 + 5*a*b ]
|
/ y /
|
(конец)
Программа:
П1 <-> П0 3 <-> x^y 3 * ИП1 x^2 2 * - ИП0 ИП1 5 * * + С/П
Var i:integer ;begin writeln ('загадайте число ,умножте на 5,прибавте 8,умножте на 2 и введите что получилось '); readln(i);writeln (i div 10); end.
Program df;
uses crt;
var a,b,c,max,sum:integer;
begin
sum:=0;
max:=0;
writeln('введите числа а,b,c');
readln(a,b,c);
if (a>0)or(b>0)or(c>0) then sum:=a+b+c else if (a>b)and(a>c) then max:=a else if (b>c) then max:=b else max:=c;
if sum=0 then wrteln('Числа отрицательные большее из них ',max) else writeln('сумма чисел ',sum); end.