Указать ошибки, переписать верный программный код.
Времени много так что не торопитесь
sock2
2
14.04.2020 06:51
0 
Популярные вопросы
- Цикл развития высших растений и основные направления эволюции развития?...
1 - Известно, что молекулы газов при комнатной температуре движутся...
3 - Дай ответ-отрицание на вопрос двумя предложениями(употреби частицу...
2 - Подобные слагаемые 1)4х-13х+29х-14х 2)-5у-28у+16у-17у 3)1.8в-с+в-4.3с...
1 - Проверьте перевод на латынь! как правильно перевести предложение...
3 - Переведите на в future simple : следующим летом я хочу с друзьями...
3 - Укажите бессоюзное сложное предложение с пропущенным двоеточием...
3 - Вид сувою видризалы трем покупцям по 2м полотна кожному писля цего...
3 - My favourite season is summer. it is sometimes it is trees . i...
1 - Уякому словосполученні слово туш вжито неправильно? 1.намальований...
1
готово
Объяснение:
program factorial;
var k, f, n: integer;
begin
k := 1;
f := 1;
Write('Введите N:');
ReadLn(n);
while k <= n do
begin
f := f * k;
k := k + 1;
end;
writeln(n,'!=',f);
end.