помогите вопрос pascalкакое значение s будет в конце ?var s, k: integer;
5-9 класс
|
begin
s := 10;
for k := 3 to 0 do
s := s * 3;
write(s);
end.
Если строка for k:=3 to 0 do записана верно то s=10(начальные данные) так цикл в этом случае открываться не будет
Другие вопросы из категории
массиве А(11) случайных целых чисел (диапазон чисел [-10.. 25] ) определить:
Читайте также
Внимание, предусмотреть ситуацию нескольких элементов с минимальным значением. В этом случае вывести на экран все индексы. Паскаль.
какое значение переменной будет S?
Var
s,k:integer;
Begin
s:=0;
for k:= 6 to 12 do
s:=s+10;
writeln(s);
End.
моментов времени. Известно, что второй момент времени наступил не раньше первого. Определите, сколько секунд прошло между двумя моментами времени. Программа на вход получает три целых числа — часы, минуты, секунды, задающие первый момент времени и три целых числа, задающих второй момент времени. Выведите число секунд между этими моментами времени.
ввод:1, 1, 1, 2, 2, 2
вывод: 3661
ввод:1,2,30,1,3,20
вывод: 50
это задача на pascal ABC
Что будет если конечное значение счетчика будет меньше начального?
Что происходит с циклом если значение шага отрицательно?
Дана программа:
Program p1;
var a:integer.
begin
write('Введите целое число:');
readln(a);
if(a>=100) and (a<1000)then write(' Да')
else write(' Нет');
End.
1.Запишите, что будет выведено на экране в результате выполнения данной в п.1 программы. при=-2, при а=123.
2. Внести данную программу изменения таким образом, чтобы программа определяла, удовлетворяет ли данное вещественное число а неравенству -14,5 < a <_ 18,
3. Даны целые числа a и b. Составьте программу, определяющую, есть ли среди них хотя бы одно, не равное нулю.
4. Ввести три целых числа. Если ни одно из чисел не является чётным, то вывестина экран их произведение.
Тема с Packal ABC.