Что выведется на экран в результате выполнения фрагмента программы (для n=3):write ('введите целое n = ');
5-9 класс
|
readln (n);
p: = 1;
for i: = 1 to n do
p: = p * i;
write (n, '! = ',p);
Вот что получится:
введите целое n = 3
3! = 6
Другие вопросы из категории
1.Замена.- переписать линейныймассив вещественных чисел b(30) в обратном порядке.
приложениях:1-текстовые редакторы2-системы разработки приложений3-служебные программы для обслуживания ПК.4-браузерыа)1423 б)3124в)1342г)2314
Читайте также
1.Что будет выведено на экран в результате выполнения фрагмента программы
цел a=5, b=3
вывод 'a,=Z(', b, ')'
2.
1.Какое число будет выведено на экран после выполнения этого фрагмента программы?
write(1);
for i:=2 to 1 do
write (i);
2.Что будет выведено на экран в результате выполнения фрагмента программы
a:=5; b:=3;
write( a, '=Z(', b, ')' );
Здесь a и b — целые переменные.
3.Что будет выведено на экран в результате выполнения фрагмента программы
a:=5; b:=3;
write( 'Z(a)=', '(b)' );
Здесь a и b — целые переменные.
Варианты:
1) as.mdb
2) as.xls
3) as.doc
4) as.ppt
2.
Пользователь работал с каталогом
C:\Контрольные\Тесты\История\
Сначала он поднялся на один уровень вверх, затем еще раз поднялся на один
уровень вверх и после этого спустился в каталог Архив. Определите полное
имя каталога, в котором оказался пользователь.
Варианты:
1) C:\Контрольные\Архив\
2) C:\Контрольные\Тесты\Архив\
3) C:\Контрольные\Тесты\История\Архив\
4) C:\Архив\
3.
Какое число будет напечатано на экране в результате выполнения фрагмента
программы?
Бейсик
F=5
FOR K=9 TO 7 STEP -1
F=F+(K+1)
NEXT K
PRINT F
Паскаль
F:=5;
FOR K:=9 DOWNTO 7 DO
F:=F+(K+1);
WRITE(F);
что появится на экране в результате выполнения программы. Для переменной S ввести строку - 'аб2в457где245*ж'
Program z2;
uses crt;
var s:string;
k,sum,i,n:integer;
begin
readln(s);
i:=1;
repeat
val(s[i],n,k);
i:=i+2;
sum:=sum+n;
writeln(n);
until i>length(s);
writeln(sum);
readkey;
end.
2) Дано предложение. Удалить из него все буквы с