На вход программе подается одна строка. Напишите программу, которая выводит строку с удаленным первым и последним символом
ПИТОН
132
446
Ответы на вопрос:
Program project1; uses crt,math; constn=10; var s: real; i,f,m: byte; a: array [1..10] of real; begin m: =0; for i: =1 to n do begin writeln('vvedite ',i,' cifru'); readln(a[i]); end; for i: =1 to n do begin if a[i]< 0 then inc(f); end; for i: =1 to n do begin if a[i]=0 then inc(m); if m< > 0 then s: =s+a[i]; end; writeln('kolichestvo otricatelnih: ',f: 2); writeln('summa vseh posle 0: ',s: 2: 2); readln; end.
Популярно: Информатика
-
VAI8141626.03.2023 02:53
-
Дияс46505.09.2021 14:03
-
бобр0422.09.2021 11:32
-
sergiomac110804.02.2021 20:28
-
DanyaHD26.02.2023 05:25
-
angelikasolnce102.09.2022 20:34
-
MaLiKaKhOn07.01.2020 16:38
-
Дошик5869411.09.2021 20:36
-
veronamut0210.05.2022 08:12
-
NeekaFox31.07.2021 00:15