Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

Перевести код с paskal на c++

РАЗУМИСТ РАЗУМИСТОВ Ученик (114), закрыт 4 года назад
var
n, x, k:longint;
c1,c2,c4,c5:byte;
begin
k:=0;
for n:= 10000 to 99999 do begin
x:=n;
c5:= x mod 10; x:= x div 10;
c4:= x mod 10; x:= x div 100;
c2:= x mod 10; c1:= x div 10;
if abs((c1+c2) - (c4+c5)) <= 2 then inc(k);
end;
write(k)
end.
Лучший ответ
Алекс Куха Высший разум (446536) 4 года назад
Все ответы уже даны, а пройти мимо не смог
Остальные ответы
Barsik59ru Мастер (1034) 4 года назад
Извиняюсь за неправильный ответ (
Леха КовалевУченик (72) 4 года назад
перевод не верный
Barsik59ru Мастер (1034) ага, ты с начало сам напиши
Stalin Obamovich Ученик (99) 4 года назад
Бог поможет помолись
Вадим Платонов Гуру (2604) 4 года назад
int main()
{
int n, x, k;
char c1, c2, c4, c5;

k = 0;
for (n = 10000; n <= 99999; n++)
{
x = n;
c5 = x % 10;
x /= 10;
c4 = x % 10;
x /= 100;
c2 = x % 10;
c1 = x / 10;

if (abs((c1 + c2) - (c4 + c5)) <= 2)
k++;
}

cout << k << endl;

return 0;
}
Krab Bark Искусственный Интеллект (283557) 4 года назад
#include "iostream"
#include "cmath"
int main(){
int k=0; for(int i=1000;i<10000;i++)
k+=std::abs(i/1000+i/100%10-i/10%10-i%10)<=2;
std::cout<<10*k<<'\n';}
Руслан Салимов Знаток (281) 4 года назад
Я не обладаю языком C++ ну и Java
Alexandr Мудрец (11958) 4 года назад
Вам уже ответили, даже в нескольких вариантах.
Похожие вопросы