Помогите срочно прошу! Решите задания, 1)Использовать для решения задач такую ср...

aleshahisjnak2014 @aleshahisjnak2014

July 2022 1 3 Report

Помогите срочно прошу! Решите задания, 1)Использовать для решения задач такую среду программирования как Free Pascal, C++ , Python

Answers & Comments

srzontmp

Решение в прикрепленном файле.

2 votes Thanks 1

aleshahisjnak2014 Тут нет к второму заданию решения

srzontmp Во втором задании во втором тесте другой результат получается, не 143702, а 122324, второй тест у Вас не пройдет, поэтому и не стал записывать решение. Текст программы могу выложить. var k,n,i,j,dk,k3,k5: integer;
a: array[1..3] of integer;
begin
write('k n через пробел: ');
readln(k,n);
for i:=1 to 3 do a[i]:=0;
for i:=1 to n do
begin
for j:=3 downto 2 do a[j]:=a[j-1];
dk:=a[3];
a[1]:=k;
k3:=k div 3;
while (k-k3*3) mod 5<>0 do k3:=k3-1;
k5:=(k-k3*3) div 5;
k:=k+k3*5+k5*9-dk;
end;
writeln(k);
end.

srzontmp Нашел ошибку в программе. Нужно заменить строку a[1]:=k; на строку a[1]:=k-a[2]-a[3];

aleshahisjnak2014 Всё равно большое спасибо!)

srzontmp Пожалуйста.

Answers & Comments

dayu 80 ballov srochno pomogite dopolnite predlozheniya statyami esli eto nuzhno23932eb00ac09404243e70774ee0067c 69640

dayu 80 ballov srochno pomogite dopolnite predlozheniya statyami esli eto nuzhno

dayu 70 ballov srochno pomogite dopolnite predlozheniya statyami esli eto nuzhno

sdelajte sleduyushie predlozheniya voprositelnymi primechanie 1 opredelite formu

vstavit vspomogatelnye glagoly ex 6 insert the auxiliary verbs 1 he mea

рекомендуемые вопросы

Helpful Links

Helpful Social