Задать вопрос!

Задать вопрос!

Все категории

4 года назад

13

Пишет:ожидалось описание или begin В чем ошибка?

Пишет:ожидалось описание или begin
В чем ошибка?

Информатика

2 ответа:

lord1astarot4 года назад

0 0

Попробуй убрать точку с запятой перед end..

whitekitty [38]4 года назад

0 0

...

var
x, y, z : real;
begin
Writeln('Введите цену за квадратный метр');

...

Читайте также

Помогите пожалуйста. Сроччнооооо

Jeje

23. Рабочий стол: Заставка; Темы; Оформление; Цветовые схемы; Разрешение.

Мой компьютер: Версия Windows; Система; Сведения об активации; Оборудования; Быстродействие.

Мои документы: Тип; Размещение; Размер; Размещение конечной папки;

0 0

4 года назад

Для какого их данных слов истинное высказывание Не (третья буква гласная )И (последняя согласная) 1)слива 2)инжир 3) ананас 4) к

Мариночка Беляева [78]

Если я правильно Вас поняла, то ИНЖИР))))))))))))))))

0 0

4 года назад

Дана строка символов. Группы символов, разделенные пробелами (одним или несколькими) и не содержащие пробелов внутри себя, будем

ИринаСергеева

Var s:string;
i,j,l,min:byte;
begin
min:=255;
readln(s);
if s[1]='a' then j:=j+1;
s[length(s)+1]:=' ';
for i:=1 to length(s)+1 do
begin
if (s[i]='a') and (s[i-1]=' ') then j:=j+1;
if s[i]<>' ' then l:=l+1 else
begin
if s[i-1]<>' ' then
if min>l then min:=l; l:=0;
end;
end;
writeln('a) Slow kotorie nachinayutsa s "a" - ',j);
writeln('b) Dlina samogo korotkogo slova - ',min);
<span>end.</span>

0 0

3 года назад

75и 72 в двоичную систему счисления

фя12 [1]

75 это 1001011 72 это <span>1001000</span>

0 0

3 года назад

Вычислить сумму чётных и произведение нечётных чисел в интервале от 1 до n. Программа Pascalabc.Спасибо)

aleksandr7800

Вот решение твоей задачки
ПС программу проверял. она отлично работает!!!!!!!!!!!!!!!!!!!!!!!!!!

0 0

4 года назад