Pascal
Объяснение:
1 program tri;
2 var a,S:real;
3 begin
4 writeln('vvedite storony kvadrata');
5 readln (a);
6 s:=a*a;
7 writeln ('ploshad ravna=',s);
8 emd.
Поделитесь своими знаниями, ответьте на вопрос:
1. Даны стороны двух квадратов A и B. Площадь какого больше - первого или второго. 2. Вычислите наименьшее из 3-х заданных чисел. Все программы в паскаль АБС.
Pascal
Объяснение:
1 program tri;
2 var a,S:real;
3 begin
4 writeln('vvedite storony kvadrata');
5 readln (a);
6 s:=a*a;
7 writeln ('ploshad ravna=',s);
8 emd.