===== PascalABC.NET =====
begin
var a := 1.7 * (4.9 - 7.23 / 4.8) + 3.4;
var b := 1.2314 + 8.85 ** 5;
var c := 0.00354 / (347 + 526.71) * 0.21;
PrintLn(a, b, c)
end.
Результаты:
9.169375 54290.7953553125 8.50854402490529E-07
1)
var
x,y,s:real;
begin
readln(x,y);
s:=abs(x*y);
writeln(s:8:2);
end.
2)
var
a:integer;
begin
readln(a);
if a mod 2=0 then writeln("четное число")
else writeln("нечетное число")ж
end.
Program p;
var
a,b,c,s: integer;
begin
writeln('введите длину:');
readln(a);
writeln('введите диагональ:');
readln(c);
b := sqrt((sqr(c) - sqr(a)));
s := a * b;
writeln('площадь прямоугольника: ', s);
end.
1. по ячейке кликните правой кнопкой - формат ячеек - вкладка выравнивание - поставить галочку возле переносить по словам - ок
2. по ячейке кликните правой кнопкой - формат ячеек - вкладка выравнивание - по горизонтали (нажимаете на стрелочку) и выбираете, также по вертикали нажимаете на стрелочку и выбираете - ок
3. тут смотря какой микрософт стоит:
- можно начать на диаграмму правой кнопкой и формат области диаграммы и выбрать подписи данных - ок