Задача 1 Алгоритм выглядит таким образом: ввести x, y; если x>y то s:=(x*y)*2; иначе s:=(x y)/2; вывод s конец. (блок-схема прилагается в скриншоте 1)
На паскале выглядит примерно так: var x, y, s:real; begin readln(x,y); if x>y then s:=(x*y)*2; else s:=(x y)/2;
writeln(s:2:2); end.
Ответ на 2 задачу Тут идентичный алгоритм: вводим 2 переменные x, y, далее создаем условие и возводим в модуль... (скриншот 2 с блок-схемой)
Ответ на 3 задачу Тут тоже.. в условии указываешь просто a На паскале выглядит примерно так:
var a, b, c:integer; {если число вещественное} begin readln(a, b, c); if (awriteln("Верно"); else writeln("Неверно"); end.
Ответ на 4 задачу На паскале: var a, b, c, max:integer; begin max:=0; readln(a,b,c); if maxmax:=a; if maxmax:=b; if maxmax:=c;
writeln(max); end.
Ответ на 5 вопрос На паскале:
Var a,b,c:integer; begin readln(a,b,c); if (a<0) then a:=a*a; writeln(a);
if (b<0) then b:=b*b; writeln(b);
if (c<0) then c:=c*c; writeln(c); end.
Удачи!
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
