Регистрация
Ravik2K
02.08.2020 03:05
Информатика
Есть ответ 👍

Вмассиве из 10 чисел переставить все нули в конец массива , не меняя порядок не нулевых элементов pascal

220
344
Посмотреть ответы 1

Ответы на вопрос:

danilcoptsov1
danilcoptsov1
4,6(25 оценок)
1. var a,b,temp: integer; begin     readln(a,b);     c: =a;     a: =b;     b: =c;     writeln(a,b); end. 2.  var ans,r1,r2,r3: real; begin   readln(r1,r2,r3);   ans: =1/(1/r1+1/r2+1/r3);   writeln(ans: 2: 2); end.

Популярно: Информатика