Спаскаль авс! 1. найти наименьшее из трех введенных с клавиатуры чисел 2. найти произведение трех четных введенных с клавиатуры чисел заранее !

117

386

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

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

jhdjshshdh

Информатика

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

1. var a,b,i,n,min: integer; begin writeln('input value'); read(a); min: =a; for i: = 1 to 2 do begin writeln('input value'); read(a); if min> a then min: =a; end; writeln('min = ',min); end.2.var a,b,c: integer; beginwriteln('input a'); read(a); writeln('input b'); read(b); writeln('input c'); read(c); a: =a*b*c; writeln('prod = ',a); end.