Есть ответ 👍

12. определите значение переменной c после выполнения фрагмента программы: a: = 60; b: = 10; a: = a - b*3; if a 13. используя следующие фрагменты составьте оператор цикла с условием. а) a: =c+1; г) then; б) for; д) do; в) a> b; е) while. 14.в каком из условных операторов допущена ошибка? а) if a б) if a> b then max: =a; else max: =b; в) if b=0 then write (‘деление невозможно’); 15.определите значения переменной s после выполнения фрагмента алгоритма: а) на «4» s: = 0; m: =6: for i: =3 to m do s: =s+i; б) на «5» s: =0; i: =5; while i> 0 do begin i: =i-1; s: =s+i; end;

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

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


//pascalabc.net 3.2 сборка 1318 var   r: real;   c: char; begin readln(r); writeln('диаметр, длина c окружности или площадь? d/l/s'); repeat readln(c); until (c='l') or (c='s') or (c='d'); case c of     'l': writeln(6,28*r);     's': writeln(3,14*sqr(r));     'd': writeln(r*2);   end; end. пример ввода: 3 d пример вывода: 6

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