Составить блок-схему по готовой программе. Program zadacha;
Var K, Min: real, N: integer;
Begin
Min:=0;
N:=0;
While N <= 5 do
Begin
Write ('Введите число');
Readln (K);
IF min>K THEN
Min:=K;
N:=N+1;
end.
136
447
Ответы на вопрос:
Популярно: Информатика
-
hyyyser11.02.2023 22:05
-
iakatya27.09.2022 14:05
-
srente23.06.2021 22:03
-
elemesayan23.03.2022 02:46
-
chinyakova97p02efn18.10.2020 07:48
-
tutuginovvan12.11.2022 16:57
-
zakir200708.10.2022 14:09
-
totty111.10.2020 08:49
-
dzyskristina50311.02.2022 17:37
-
DeStreudG29.12.2022 06:38