Составьте программу,которая позволяет вычислить площадь прямоугольника.,заданного своими сторонами a,b (a,b: целые числа).

288

395

Посмотреть ответы 2

Ответы на вопрос:

evgen16112000

Информатика

4,4(45 оценок)

Program ploschad; var s,a,b: integer; begin write( 'введите a: '); readln(a); write( 'введите b: '); readln(b); s: =a*b; write( 'площадь=',s); end.

Ксюшкаа1

Информатика

4,5(50 оценок)

Program zhn; type atype = array of integer; var n,i: integer; a: atype; begin write('введите количество элементов в массиве: '); readln(n); setlength(a,n); for i: =0 to n-1 do begin a[i]: =random(100); if i mod 2 = 0 then writeln(i,') ',a[i]); end; end.