Есть ответ 👍

Нехай деякі змінні набувають відповідно значеньx=234, y= -85 , a=2.23, b=35000, c= 0.0.В яких з прикладів правильно описані вказані змінні: A : Var x,y:real; a,b,c:real;
B : Var x,y:integer; a,b,c:integer;
C : Var x,y:integer; a,b,c:real;
D : Var x,y:real; a,b,c:integer
E : Var x,y,b:integer; a,c:real;
F : Var x:integer; y,a,b,c:real;

227
435
Посмотреть ответы 1

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

LizaS0404
4,7(60 оценок)

Program programma; uses crt; var a: array[1..100]of integer; i,max,p: integer; begin clrscr; p: =1; for i: =1 to 9 do begin write('a[',i,'] = '); readln(a[i]); end; for i: =1 to 9 do begin if a[i]> max then max: =a[i]; end; for i: =1 to 9 do begin if a[i]< > max then p: =p* a[i] end; writeln; writeln('max = ', max); write('p = ',p); end.

Популярно: Информатика