сервис вопросов и ответовVar n,s:integer;
10-11 класс|
|
Begin
N:=0;
S:=0;
While s<=35 do begin
N:= n+1;
S:=s+4
End;
Write(n)
End.
Решите пожалуйста, надо с решением.
AnnaMiron
17 авг. 2013 г., 15:48:34 (10 лет назад)
Izvekovavika
17 авг. 2013 г., 16:54:31 (10 лет назад)
пока s<=35 будут выполнятся следующие действия:
N:=n+1;
S:=s+4;
Цикл прекратится после 9 раз
N:=0+1=1;
N:=1+1=2;
...
N:=8+1=9
Ответить
Другие вопросы из категории
Access
1. Что такое запросы?
2. Что такое отчеты?
3. Что такое формы?
4. Что такое бланк запроса?
Сообщение занимает 3 страницы и содержит 7875 байтов информации. Сколько строк в тексте, если символов в строке 50 и при составлении этого сообщения
использовали 128-символьный алфавит?
Напишите программу нахождения длин медиан m1,m2 и m3, треугольника по указанными формулами . Длина сторон a,b,c задается с клавиатуры
m1=1/2*sqrt(2a^2+2b^2-c^2); m2=1/2*sqrt(2a^2+2c^2-b^2); m3=1/4*sqrt(2b^2+2c^2-a^2);.
Читайте также
Var x,y:integer;
function nod(x:integer):Longint;
begin
if x=0 then nod:=1
else nod:=nod(x-1)*x
поясните последние две строчки плз
Определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin s:=3; k:=1;
while k < 25 do begin
s:=s+k;
k:=k+2;
end;
write(s);
end.
15. Определите
результат выполнения программы:
var
i, sum: integer;
Почему на этапе ввода последней ступени (т.е. задали х=5 и вводим 5 ступень) паскаль выкидывает ошибку: "Индекс находился вне границ массива", ведь al[x]
это его последний элемент, разве нет?
Код:
program s1;
var x, i:integer;
al, tl: array of real;
begin
writeln ('Введите количество ступеней ракеты'); read (x);
setlength (al, x);
setlength (tl, x);
for i:=1 to x do begin
writeln ('Введите ускорение ', i, ' ступени'); read (al[i]);
writeln ('Введите время работы ', i, ' ступени'); read (tl[i]);
end;
end.
P.S.: Переписать массив в статический не предлагать, нужен именно переменной длины. Заранее спасибо.
Вы находитесь на странице вопроса "Var n,s:integer;", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.