Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
0 / 0 / 0
Регистрация: 17.03.2020
Сообщений: 32
1

Пишет что Program1.pas(10) : Встречено 'else', а ожидалось ':' Что делать?

03.07.2020, 13:09. Показов 1437. Ответов 1

Author24 — интернет-сервис помощи студентам
Пишет что Program1.pas(10) : Встречено 'else', а ожидалось ':' Что делать?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
begin
var n := ReadInteger('n =');
var a := ReadArrReal('Вводите:', n);
a.Count(p -> p > 0).Println;
var b := ReadReal('Введите число:');
a.Count(p -> p < b).Println;
var i := a.LastIndexOf(0.0);
if i > -1 then 
a?[i.Sum.Print
else
Print(0)
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
03.07.2020, 13:09
Ответы с готовыми решениями:

Что не так ? выдает ошибку -Program1.pas(9) : Встречено 'end', а ожидалось then
program m1; var a: array of integer; i,n,k,h,v,c: integer; begin readln (n); for i:= 1 to...

Program1.pas(6) : Встречено ';', а ожидалось '.'
Program z4; var n: integer; begin writeln('введите, сколько прошло минут'); reanln(a); ...

Program1.pas(6) : Встречено '<', а ожидалось выражение
PROGRAM OL; Var a, b, h:integer; begin WriteLn('Введите число'); ReadLn(a); If a&gt;=2 and a=&lt;14...

Проверить расчет по формуле: Program1.Pas(8): Встречено 'else', а ожидалось ';'
Program ChM; Var a,b,y,z: real; begin Writeln('Введите y и Z'); Read(y,Z);...

1
5079 / 2651 / 2349
Регистрация: 10.12.2014
Сообщений: 10,028
03.07.2020, 13:28 2
Цитата Сообщение от Амина 128762 Посмотреть сообщение
a?[i.Sum.Print
Это что такое?
0
03.07.2020, 13:28
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
03.07.2020, 13:28
Помогаю со студенческими работами здесь

Встречено r, а ожидалось ; что делать?
var x,n,r,f:integer; begin write('Введите числа'); readln(x,n); f:=1; r:=1; while r&lt;=n do...

Program1.pas(1) : Пространство имен 'System.UriKind.Relative' не найдено что делать
у меня выдаем ошибку Program1.pas(1) : Пространство имен 'System.UriKind.Relative' не найдено что...

Program1.pas(63) : Встречено 'else', а ожидалось ';'
var a:array of integer; st:array of integer; rez:array of integer; sum,i,j,k,x,s,n:integer;...

Program1.pas(12) : Встречено 'else', а ожидался оператор
Program jg; Label 1; Var y,x:integer; Begin y:=6; Write('Введите число '); 1:Readln(x);...

Program1.pas(34) : Встречено 'begin', а ожидался идентификатор
34 строка uses GraphABC, events; var a,i: integer; B:array of string; // B - это массив для...

Паскаль показывает. Program6.pas(2) : Встречено '?', а ожидалось выражение
Паскаль. Одномерный массив Дан одномерный массив целых чисел, содержащий п элементов. Упорядочить...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru