Есть ответ 👍

Pascal в зависимости от времени года "весна", "лето", "осень", "зима" определить погоду "тепло", "жарко", "холодно", " холодно".

120
158
Посмотреть ответы 3

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

belok909
4,4(2 оценок)

Var a,b: string; begin write('введите время года ==> '); readln(a); if (a='зима') then write ('зима ==> холодно'); if (a='весна') then write ('весна ==> тепло'); if (a='лето') then write ('лето ==> жарко'); if (a='осень') then write ('осень ==> холодно'); end.
saya8282
4,4(96 оценок)

Вот решение данной .

Var a,i,x1,x2,s: integer; begin s: =0; x1: =0; a: =1; while (a< > 0) do begin writeln('vvodite   elementi stroki , po   okonchanii   vvedi 0 ')  ;   readln(a); x2: =x1; x1: =a; if   (x2=x1)   then  s: =1; end; if (s=1)   then writeln('sushestvyet') else writeln('ne   sushestvyet'); end.

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