Uses crt;
var a, b, S, P:integer;
begin
write('a='); readln(a);
write('b='); readln(b);
S:=a*b; P:=2*(a+b);
write('S=',S,' ','P=',P);
end.
p.s.Где мы выводим на экран значения площади,там после второй S запятая,затем два апострофа через пробел(для пробела в итоге),затем запятая,потом вывод периметра идет аналогичным образом,вот! Спрашивайте,если что не понятно!
Друга ищи, а найдешь - береги
Старый друг лучше новых двух
От англ. <span>log in логичнее лОгин, но скорей всего допустимы оба варианта.
</span>
//Dev-C++ 5.11 (C)
#include <stdio.h>
int main(void)
{int arr[100],n,k;
scanf("%d",&n);
k=0;
for(int i=0;i<n;i++)
scanf("%d",&arr[i]);
for(int i=0;i<n;i++)
if(i==0 && arr[i]>arr[i+1])k++;
else
if(i==n-1 && arr[i]>arr[i-1])k++;
else
if(arr[i]>arr[i-1] && arr[i]>arr[i+1])k++;
printf("%d",k);
return 0;}
Uses crt;
var g: Integer;
n,m: Real;
Begin
Write('Введите два числа: ');
Readln(m,n);
If m>n then begin
g:=n;
n:=(m+n)/2;
m:=2*m*n;
end
else begin
g:=m;
m:=(m+n)/2;
n:=2*m*n;
end;
Writeln('m = ', m, ' n = ', n);
End.