Встречено 'a', а ожидалось ';' В чем ошибка в 6 строчке?
program jfsdkp;
var s, i, a:integer;
var k:array [0..10] of integer;
begin
for i:=1 to 11 do
write a[k]:=(' введите текст с клавиатуры ');
s:=0;
for k:=1 to 9 do begin
if 2*a[k]
s := s+ a[k];
a[k] :=2*a[k]
end;
end;
Writeln;
for k:=1 to 9 do
write(s);
end.
263
492
Ответы на вопрос:
write (a[k],' введите текст с клавиатуры ');
Не понял, что ты хочешь сделать этим выводом, и зачем здесь вообще выводится элемент массива, но ошибка в строчке по той причине, что выражение не взято в скобки.
Объяснение:
var
x:integer;
y:real;
begin
readln(x);
y:=3/(1+abs(x));
writeln('y=', y);
end.
Популярно: Информатика
-
agroDan31.05.2020 07:56
-
sametovarnur13.03.2022 08:26
-
Артем1469875226917.07.2020 12:50
-
SofaBai01.01.2023 05:27
-
dasharisk210409.07.2021 13:39
-
nadezhdalipchan09.05.2022 03:33
-
H1biki16.01.2021 01:11
-
makoldinvyacheoxyw3a22.01.2020 03:25
-
30Космос0319.07.2022 06:29
-
DarinaDoka66615.09.2021 14:01