Написать программы на паскале 1.вычислить произведение 3-х вводимых чисел которые меньше 20. 2. вывести на экран количество четных и количество нечетных чисел в диапазоне от х до у.
148
448
Ответы на вопрос:
1)
uses crt;
var a,b,c: integer;
begin
read(a,b,c);
if (a> 20) or (b> 20) or (c> 20) then write(a*b*c) else write('одно из чисел больше чем 20');
end.
2)
uses crt;
var x,y,i,k,k1; integer;
begin
read(x,y);
for i: =x to y do
begin
if (x mod 2=0) then k: =k+1 else k1: =k1+1;
writeln('четных: ',k);
write('нечетных: ', k1);
end.
#
a = list(map(str, input("Введите фамилию и имя: ").split()))
print(f"{a[1][:1]}. {a[0]}")
# B
a = list(map(str, input("Введите фамилию, имя и отчество: ").split()))
print(f"{a[1][:1]}.{a[2][:1]}. {a[0]}")
Популярно: Информатика
-
anhelinaivancha07.07.2022 12:36
-
Катерика200417.03.2020 20:21
-
МасяшкаМ12.09.2020 12:49
-
Вадик15111.05.2020 22:34
-
volgaslob24.08.2022 06:15
-
ed3112121.12.2020 10:35
-
dOgIchARM17.10.2020 18:44
-
DarkoRei17.07.2021 11:23
-
khudobeidiana01.10.2020 23:04
-
нур10125.05.2022 15:46