с решением по информатике программа паскаль, использовать while
newsosnovskiymp06yuf
3
14.04.2021 17:11
2
Другие вопросы по теме Информатика
KoTBPoccuu
02.03.2021 11:55
tatite15
02.03.2021 11:55
milanasadykovaMilok
02.03.2021 11:54
Gykplhgv
29.08.2019 08:20
solmazmitok
29.08.2019 08:20
yvvv
29.08.2019 08:20
mafobe66
01.10.2019 21:30
Denis8903
01.10.2019 21:30
jane24p075cn
12.08.2019 07:40
Популярные вопросы
- До іть будь ласка.Обчисли значення виразів.32 760:70*20+18 680:40=...
2 - ʕ º ᴥ ºʔраспределите что к чему относится...
1 - У прямокутному трикутнику АВС катет АС=15см а кут В=30см Знайти гіпотенозу АВ...
2 - 1)Где живет Скандер? 2)Каково его желание? 3)Чем отличается окружающая среда...
2 - Исправить ошибки в тесте: 12.I didn t know Eddie Murphy singing so well 13. I...
3 - решите задачу показания : А1-3А, А2-2А , V-6B, R1=2 Ом , Rл=1 Ом, R2=4 Ом Найти...
2 - Дано трёхзначное число. Напишите программу, которая определяет: а)есть ли среди...
1 - В онтогенезі плазунів відсутня стадія хелп пліз дуже ів...
2 - решите последнее задание , потому что я вообще хз что отвечаете. Задание на фото:...
3 - Автобус масово 4 т, рухається із вимкненим двигуном, зупинився під дією гальмівної...
2
1.
var i:integer;
begin
i:=1;
while i<=10 do begin
writeln(sqrt(i));
i:=i+1;
end;
end.
2.
var price:real;
i:integer;
begin
write('Цена 1кг конфет? ') ;
readln(price);
i:=1;
while i<=10 do
begin
writeln('Цена ', i, 'кг конфет: ', i*price);
i:=i+1;
end;
end.