Задание 10 Параграф 20 ГДЗ Семакин 8 класс (Информатика)
Решение #1
Рассмотрим вариант решения задания из учебника Семакин, Залогова 8 класс, Просвещение:
10. Составьте программы на Паскале для решения задач № 6-9 из заданий к предыдущему параграфу. При этом отмените ограничения на количество операций в арифметическом выражении, сформулированные в условиях задач.
program y_6;
var
a, b, c, d, m, n: integer;
begin
write('Введи через пробел a,b,c,d >>');
readln(a, b, c, d);
m := a * d + b * c;
n := b * c;
writeln('a/b+c/d =', m / n:5:2);
end.
program y_7;
var
x, y: integer;
begin
write('Введи x >>');
readln(x);
x := x * x;
y := (1 - x + 5 * x * x);
y := y * y;
writeln('y =', y);
end.
y=x8
program y_8_8;
var
x, y: integer;
begin
write('Введи x >>');
readln(x);
y := x * x;
y := y * y;
y := y * y;
writeln('y =', y);
end.
y=x10
program y_8_10;
var
x, y: integer;
begin
write('Введи x >>');
readln(x);
x := x * x;
y := x * x;
y := y * y * x;
writeln('y =', y);
end.
y=x15
program y_8_15;
var
x, y: integer;
begin
write('Введи x >>');
readln(x);
y := x * x;
y := y * y * x;
y := y * y * y;
writeln('y =', y);
end.
y=x19
program y_8_19;
var
x, y: integer;
begin
write('Введи x >>');
readln(x);
y := x * x;
y := y * y;
y := y * y * x;
y := y * y * x;
writeln('y =', y);
end.
program y_9;
var
a,b,c,t: integer;
begin
write('Введи a,b,c >>');
readln(a,b,c);
t:=a; a:=c; c:=b; b:=t;
writeln('a=', a,' b=',b,' c=',c);
end.
*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением
