Регистрация
nastya123litvin
16.03.2020 06:24
Информатика
Есть ответ 👍

Як викликати на виконання підзадачу в середовищі Скретч​

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

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

leravolk399
leravolk399
4,4(28 оценок)

1)

varx: integer; y: real; beginwrite('x='); readln(x); if x> 3 then y: =(x*2+5); if x< =3 then y: =x-8; writeln('y=',y); end.

 

2)

var s,a,b,c: real; beginwriteln('vvedite a,b,c'); readln(a,b,c); s: =0; if a> 0 then s: =s+a; if b> 0 then s: =s+b; if c> 0 then s: =s+c; write(s); end.

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