Составьте программу,которая загадывает пользователю загадку и дает ему три попытки отгадать ее.работа программы сопровождается диалогом с пользователем.желательно применить конкатенацию введенных строк.
295
446
Ответы на вопрос:
Var a,d: integer; begin write ('введите число: '); readln (a); write ('d,' '); for d: =2 to (a div 2) do if a mod d=0 then (write (d,' '); write (a); end.
15,5 мб = 0,0155 гб. в сумме занято 2,2955 гб.
пропорция:
8гб - 100%
2,2955 - х%
х= 2,2955*100/8 = 28,69375% занято
округляем до 28,7.
свободно 100 - 28,7 = 71,3%
Популярно: Информатика
-
милаха8020.02.2020 03:51
-
румия240816.08.2022 06:50
-
vlodimirfrolov25.02.2021 23:13
-
natalicharry13.09.2021 11:56
-
artemkharlamov105.05.2022 07:54
-
анарочка55510.11.2022 18:43
-
Ania0724.04.2020 03:03
-
darinakor140197nooii02.01.2020 18:28
-
AnnPogodina121.08.2020 08:19
-
mirator9108.10.2020 04:16