Есть ответ 👍

Составить программу, которая определяет, принадлежит ли заданное число отрезку [0; 2]. на языке pascal, pascalabc.net

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

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

Толиk
4,4(41 оценок)

1. pascalabc.net // pascalabc.net 3.2, сборка 1362 от 14.12.2016 // внимание! если программа не работает, обновите версию! begin   var x: =readreal('введите число: ');   writeln((x> =0) and (x< =2)? 'да': 'нет') end. пример введите число: 1.17 да 2. на этой же версии в стиле традиционного школьного паскаля var   x: real; begin   write('введите число: '); read(x);   if (x> =0) and (x< =2) then writeln('да')   else writeln('нет') end.

var

a: array [1..n] of integer;

i,s:integer;

begin

s:=0;

for i:=1 to n do

begin

if a[i]<0 then s:=s+a[i];

end;

end.

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