1. составить программу ввода величины времени суток t (0< =t< =24)и выдачи текста: "вы уже проснулись? " - если t< 10 "не пора ли обедать? " - если t=12 "еще не вечер! " - если t> =18 "как работается? " - в остальных случаях.

281

346

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

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

maximkanariks

Информатика

4,7(62 оценок)

Язык: паскаль var t: byte; begin readln (t); if (t< 10) then writeln ('вы уже проснулись? '); if (t=12) then writeln ('не пора обедать? '); if (t> =18) then writeln ('ещё не вечер! ') else writeln ('как работается? ') end.

Kamillka005

Информатика

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

Const n=25; var b: array[1..n] of integer; s,k,a,i: integer; begin writeln('vvedite massiv'); for i: =1 to n do readln(b[i]); writeln('a='); readln(a); k: =0; s: =0; for i: =1 to n do if i mod 2=1 then s: =s+b[i]; if (b[i]> a) and (b[i] mod 5=0) then inc(k); writeln ('s=',s,' k=',k); readln; end.