Регистрация
avrika
09.05.2020 09:55
Информатика
Есть ответ 👍

1. Исправить ошибки. Дан целочисленный одномерный массив. Есть ли в нем отрицательный элемент? (8 ошибок). Program Школа;
Const n=10;
Var X: [1..n] Of Integer;
i, k: real;
Begin
For i:=1 To n Do Readln (X[i]); {ввод массива}
k:= 0
For i:=1 To n Do
If X[i] 0 Then k:= k - 1;
If k 0 Then Writeln (‘yes’);
Else Writeln (‘no’);
Readln
!

147
431
Посмотреть ответы 1

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

bektursun
bektursun
4,7(30 оценок)
День и ночь кончаются мягким знаком (ь на конце) кончается лето и начинается осень буквой о. (лет о  осень) это загадка с подвохом.

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