Премини към съдържанието

diavola90

Потребител
  • Публикации

    4
  • Регистрация

  • Последно онлайн

Харесвания

0 Неутрална репутация

1 Последовател

Всичко за diavola90

  • Титла
    Новобранец
  1. Помощ за задачи на Pascal (merged)

    здравейте колеги, написах малко от програма та но зациклих, написах функцията за отделяна на цифрите на числото, но незнам как ще стане да отделя в границата на двете числа а то само отделя на първото. Ето и кода var i,n,d,:integer; A,B,C,R:longint; mas1:array[1..400] of real; mas2:array[1..400] of real; cif:array[1..400] of real; begin write('v1vedete parvoto chisloto ='); readln(A); write('v1vedete parvoto chisloto ='); readln(B); for i:=1 to 15 do begin if (A<>0) then begin C:=A mod 10; A:=A div 10; cif:=C; end; n:=n+1; end; for i:=1 to 15 do writeln(cif:0:0); readln end. моля помогнете ...
  2. Помощ за задачи на Pascal (merged)

    Здравейте колеги, имам да пиша програма на pascal, имам идея как ще стане но стигам до задънена улица и немога да продаължа. Ако можете да помогнете ще съм ви много благодарен. Ето и заданието: Ако потребителят задава две произволни естествени числа A и B, да се състави блок-схема и програма на Pascal разпределящи числата разположени между A и B в два масива mas1 и mas2 така че: - в пурвият масив се постават тези числа, на които сумата от цифрите е четно число. - вув вторият масив се поставят тези числа, на които всички цифри са нечетни.
  • Разглеждащи в момента   0 потребители

    Няма регистрирани потребители разглеждащи тази страница.

×

Информация

Поставихме бисквитки на устройството ви за най-добро потребителско изживяване. Можете да промените настройките си за бисквитки, или в противен случай приемаме, че сте съгласни с нашите условия за ползване.