хелп,срочно помогите.Информатика.паскаль
Приложения:
Ответы на вопрос
Ответил lbvf23
0
Var x, i:Integer;
Begin
Write('x=') ;read(x) ;
I:=0;
While i<>x do begin
Write(' ', i) ;
I:=random(10)end;
Write(' ', i) ;
Write('Нашли число') ;
End.
Ответил timka2004444
0
спасибо!)
Новые вопросы
Другие предметы,
1 год назад
Русский язык,
1 год назад
Математика,
7 лет назад
Математика,
7 лет назад
Физика,
8 лет назад
Математика,
8 лет назад