Ответы на вопрос:
программы на pascalabc
5. площадь квадрата :
program ee;
var a,s: integer;
begin
writeln('введите сторону квадрата');
readln(a);
s : = a*a;
writeln('площадь равна: ',s);
end.
15. вычисление значение
выражения
program ee;
var a,b,c,d: integer;
q: real;
begin
writeln('введите переменную a');
readln(a);
writeln('введите переменную b');
readln(b);
writeln('введите переменную c');
readln(c);
writeln('введите
переменную d');
readln(d);
q: =a/c*b/d-(a*b-c)/c*d;
writeln('значение выражения равняется: ',q);
end.
Популярно: Информатика
-
ressoli44405.02.2021 07:52
-
arm2129.08.2022 08:45
-
fernandic20101129.11.2022 21:12
-
alyapareczkaya20.02.2021 21:28
-
aygi77705.09.2021 11:11
-
lilytrap20.02.2022 07:40
-
DianaSagatbekova22.03.2020 21:52
-
lenyabukevich26.03.2023 14:05
-
Chekchik05.11.2022 01:55
-
Anonim22333210.06.2023 02:42