Напишите программу в abcpascal, на уровне 9 класса. : напечатать минимальное число, большее 200, которое нацело делится на 17.

234

473

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

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

XMCBVSAJHDBV

Информатика

4,6(34 оценок)

program pr1; uses crt; var x: real; beginclrscr; x: =0; while x< =2.5 do begin writeln('y=',2*x+3); x: =x+0.1; end; end.2)

program pr1; uses crt; var b: array[1..16] of integer; i,p: integer; beginclrscr; for i: =1 to 16 do begin writeln('vvedite ',i,'-i chislo massiva'); readln(b[i]); end; writeln('vvedite p'); readln(p); for i: =1 to 16 do if b[i]=p then writeln(i,' ',b[i]); end.