сервис вопросов и ответовTurbo Pascal
5-9 класс|
|
В 1 день спортсмен пробежал 10 км.Каждый следующий день спортсмен увеличивал норму пробежки на 500м (0,5км).через сколько дней он будет пробегать 30 км?100 км?
Kybareva
19 февр. 2017 г., 1:36:01 (7 лет назад)
Maryam66
19 февр. 2017 г., 3:40:37 (7 лет назад)
var c,d,b,f:integer;
a,e:real;
Begin
a:=10;
e:=10;
f:=0;
while a<30 do
begin
a:=a+1/2;
b:=b+1;
end;
writeln(b);
while e<100 do
begin
e:=e+1/2;
f:=f+1;
end;
writeln(f);
end.
Sazonova200428
19 февр. 2017 г., 8:41:34 (7 лет назад)
Можешь написать в самом верху program test;
Snitko2002
19 февр. 2017 г., 12:28:40 (7 лет назад)
Ukoz а в конце rteadkey; надо?
Ответить
Другие вопросы из категории
В каких позиционных системах счисления выполняется равенство 515b+4305=9463. Цифры со значением больше 9 представляются строчными латинскими буквами.
Таким образом, основание системы счисления должно быть больше 2 и не больше 36.В ответе перечислите все основания систем счисления в порядке их возрастания, разделяя их запятой.
FAT16, FAT32, NTFS-виды...
А) файловых систем
Б) операционных систем
В) DOS-оболочек
Г) расширений для OC Windows
нужно сегодня,пожалуйста помогите!
Читайте также
1.Какое значение переменной S будет напечатано после выполнения фрагмента программы,записанной на языке программирования TURBO PASCAL:A:=2В: = 3;
if A>B then S: = A+B;
writeln (S);
Варианты ответов:1)5 ;2)6; 3)7; 4)8
2. Какое значение переменной S будет напечатано после выполнения фрагмента программы, записанной на языке программирования PASCAL:
S: =1;
N: =1;
while N<=3 do
begin
S: = S*N;
N: = N+1;
end;
writeln(S);
Варианты ответов: 1)2 ; 2)1; 3)0; 4)4
Помогите, пожалуйста, выполнит задания, связанные с Turbo Pascal: 1) Определить, что будет напечатано
в результате работы следующего фрагмента программы:
var k,s:integer;
begin
s:=0;
k:=1;
while k<11 do begin
s:=s+k;
k:=K+1;
end;
write(s);
end.
1.1 Запишите этот же фрагмент с помощью оператора Repeat...until
2) Значения двух массивов A[1..100] и B[1..100] задаются с помощью следующего фрагмента программы:
for n:=1 to 100 do
A[n]:=n-10;
for n:=1 to 100 do
B[n]:=A[n]*n;
Сколько элементов массива B будут иметь положительные значения?
а)10 б)50 в)90 г)100
Вы находитесь на странице вопроса "Turbo Pascal", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.